delphi4arab منتديات دلفي للعرب

Free Pascal IDE

بديل مجاني ومفتوح المصدر لتوربو باسكال للويندوز (أظن مبرمجه تونسي)

كود :
Description

 Turbo Pascal IDE. Pascal XE is an IDE for Pascal programming, an alternative to TPW 1.5 (Borland Turbo Pascal for Windows 1.5) and Borland Turbo Pascal 7 for Windows 64-bit (x64) and 32-bit (x86).

Pascal XE is a comprehensive and easy to use IDE for Pascal Coding and programming.

Pascal XE uses the powerful Delphi compiler 15.0 freely distributed with Delphi 7 personal edition

الموقع: https://sourceforge.net/projects/pascalxe

كود :
Features

[*]Handy Keyboard Shortcuts
[*]Multi Syntax Highlighter
[*]Smart error indication (&warnings &hints)
[*]Code Beautifier
[*]Completion proposal
[*]Custom GUI Themes
[*]Multi-language user interface (English/Arabic/French)
[*]Contextual Turbo Pascal help (English/French)
[*]Quickly edit multiple lines with multiple carets
[*]Toggle case sensitive (Lower/Upper/Title/Alternate/Sentence)
[*]Line numbering
[*]Print with/without Syntax highlighting
[*]Html Export
[*]Multi-tab
[*]Reopen recently closed tabs
[*]Clipboard History
[*]Search function
[*]Line/word/character count
[*]And much more...

السلام عليكم
حسب ما فهمت هو واجهة، يعني محرر اكواد والcompiler هو دلفي 7

(25-09-2017, 01:35 PM)B.M.AbdelAziZ كتب : [ -> ]السلام عليكم
حسب ما فهمت هو واجهة، يعني محرر اكواد والcompiler هو دلفي 7

هذا ما يصرح به صاحب المشروع
في السورس، بعد إطلاع سريع، لم أجد المجمع المذكور، ربما بعد تثبيت الدلفي 7 النسخة الفردية.
أو ربما نسخه إلى المجلد PascalXE\Release\LibBin

PHP كود :
procedure TMainForm.ActionCompileCompileExecute(Sender: TObject);

      PathUnits:=ExtractFilePath(Application.ExeName)+'LibBin';

      if not(FileExists(PathUnits+'\Crt.dcu')) or
         not(FileExists(PathUnits+'\DCC32.EXE')) or
         not(FileExists(PathUnits+'\DCC32.FR')) or
         not(FileExists(PathUnits+'\DCC32EN.EXE')) or
         not(FileExists(PathUnits+'\DCCRES.PXE')) or
         not(FileExists(PathUnits+'\Messages.dcu')) or
         not(FileExists(PathUnits+'\RCEDIT.exe')) or
         not(FileExists(PathUnits+'\ShellAPI.dcu')) or
         not(FileExists(PathUnits+'\SysConst.dcu')) or
         not(FileExists(PathUnits+'\SysInit.dcu')) or
         not(FileExists(PathUnits+'\System.dcu')) or
         not(FileExists(PathUnits+'\SysUtils.dcu')) or
         not(FileExists(PathUnits+'\TPWEN.HLP')) or
         not(FileExists(PathUnits+'\TPWFR.HLP')) or
         not(FileExists(PathUnits+'\Types.dcu')) or
         not(FileExists(PathUnits+'\Win32CRT.dcu')) or
         not(FileExists(PathUnits+'\WinCrt.dcu')) or
         not(FileExists(PathUnits+'\Windows.dcu')) or
         not(FileExists(PathUnits+'\WINHLP32PX.EXE'))
      then
      begin
        TmsOutput.Cells[1,1]:=LanguageDataModule.GetCompilerMessage('MissedUnits');
        TmsOutput.Colors[0,1]:=clYellow;
        FProcessingEventHandler:=false;
        Exit; 

بعد التثبيت، الملفات التي يعتمد عليها البرنامج للتجميع
[attachment=3601]

delphi4arab منتديات دلفي للعرب

merouane

محمد عبد العزيز

merouane

merouane