Erstellen einer TRichEdit Komponente

[HolgerCW]

Hallo zusammen,

wie erstelle ich im Code eine TRichEdit-Komponente.

Was muss als Parameter bei:

Delphi-Quellcode:

var
 MeinRE_Text: TRichEdit;
begin
 MeinRE_Text := TRichEdit.Create(???);
end;

rein ?

Brauche die Komponente nur um Sie an eine Funktion zu übergeben.

Gruss

Holger

[DeddyH]

Das Control, das als Owner für die Freigabe des RichEdit zuständig sein soll (kann auch nil sein, aber dann musst Du händisch freigeben).

[HolgerCW]

Zitat von DeddyH:

(kann auch nil sein, aber dann musst Du händisch freigeben).

Vielen dank. Wie gebe ich denn händisch frei ?

[DeddyH]

Mit Free bzw. FreeAndNil.

Delphi-Quellcode:

RE := TRichEdit.Create(nil);
try
  //Mach was mit dem RichEdit
finally
  RE.Free;
  //oder FreeAndNil(RE);
end;

[HolgerCW]

Du meinst zum Schluss händisch frei geben ?

Wenn ich nämlich folgendes tue:

Delphi-Quellcode:

MeinRE_Text := TRichEdit.Create(nil);
MeinRE_Text.Lines.Insert(0,'Test');

kommt die Meldung: "hat kein übergeordnetes Fenster"

Gruss

Holger

[DeddyH]

Delphi-Quellcode:

MeinRE_Text := TRichEdit.Create(nil);
MeinRE_Text.Parent := self; //Parent setzen
MeinRE_Text.Lines.Insert(0,'Test');

[Lannes]

Hallo,

Zitat von HolgerCW:

Brauche die Komponente nur um Sie an eine Funktion zu übergeben.

wenn ich mal fragen darf, was macht die Funktion mit dem übergebenem RichEdit?

[DeddyH]

Ich kann nur vermuten, dass es um RTF geht.

[Lannes]

Hallo,

hätte ich jetzt nicht gedacht

Wenn nur die internen Funktionalitäten des RichEdit genutzt werden sollen würde ich eine unsichtbares(virtuelles) RichEdit nutzen.

Delphi-Quellcode:

// war mal in einem Thread ein Vorschlag von marabu
FVirtualRE := TRichEdit.CreateParented(THandle(-3));

damit kann man alles veranstalten, z.B.auch per SelAttributes RTF-Code verändern, RTF drucken etc.

[DeddyH]

Das ist natürlich die elegantere Methode, aber ich wollte zumindest die Ausgangsfrage beantworten