Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**himitsu**

Delphi-Quellcode:

			procedure TForm1.FormCreate(Sender: TObject);

begin

  with TEdit.Create(nil) do

    ShowMessage(Self.ClassName);

end;

Ergebnis: "Form1", also die Form und nicht das Edit

PS: In einer normalen Funktion (keiner Methode) würde hier auch der Compiler meckern.

himitsu Online Registriert seit: 11. Okt 2003 Ort: Elbflorenz 44.316 Beiträge Delphi 12 Athens	#6 Re: TStringList im with übergeben 11. Feb 2010, 19:10 markieren Delphi-Quellcode: procedure TForm1.FormCreate(Sender: TObject); begin with TEdit.Create(nil) do ShowMessage(Self.ClassName); end; Ergebnis: "Form1", also die Form und nicht das Edit PS: In einer normalen Funktion (keiner Methode) würde hier auch der Compiler meckern. Ein Therapeut entspricht 1024 Gigapeut.
	Zitat