ein dynamisch erstelltes object abfragen!

[Jens Schumann]

Hallo,
stimmt so geht es auch nicht.
Es geht aber, wenn Du im private Abschnitt des Formulars labeledx: TlabeledEdit; deklarierst.
Also ungefähr so:

Delphi-Quellcode:

...
private
  Flabeledx:  TlabeledEdit;

...

procedure Tform1.button1onclick(Sender: Tobject);
begin
    Flabeledx:= TlabeledEdit.Create(form1);
    Flabeledx.Parent := form1;
    Flabeledx.Name := 'XXX';
    Flabeledx.EditLabel.Caption := 'egal';
    Flabeledx.text:='';
    Flabeledx.Top := 80;
    Flabeledx.Left := 12;
    Flabeledx.Width:= 30;
    Flabeledx.Height := 21;
end;

procedure Tform1.verarbeiten(Sender: Tobject);
begin
  if Flabeledx.text <> '' then
  begin
    form1.Brush.Color:=cllime;
  end;
end;