SynEdit unter Turbo Delphi

[Blackheart]

Zitat von dominikkv:

du musst nicht die Units dem Projekt hinzufügen...

1) Du hast einen Ordner in dem alle Units der Komponente liegen. Diesen gibst du jetzt bei den Optionen als zusätzlicher Suchpfad der Bibliothek mit an.
2) Du bindest die entsprechende Unit (zB SynEdit) unter den uses ein.
3) Du kannst die Komponente dynamisch erzeugen und freigeben.

In etwa so

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, SynEdit, SynHighlighterCpp;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
    procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
  Memo:TSynEdit;
  CPP:TSyncppSyn;
implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  Memo:=TSynEdit.Create(Self); //SynEdit erzeugen
  CPP:=TSyncppSyn.Create(Self);//C++ HL erzeugen
  Memo.Highlighter:=CPP;
  Memo.Parent:=Form1;
  Memo.Top:=10;
  Memo.Left:=10;
  Memo.Height:=300;
  Memo.Width:=500;
end;

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  Memo.Free;
  CPP.Free;
end;

end.