Edit von Frame aus ändern

[geskill]

Hey, habe ziemlich lang gebraucht bis ich den Fehler gefunden habe ^^

Das ist deine aktuelle DPR Datei.

Delphi-Quellcode:

program BatchEditor;
uses
  Forms,
  Ausgeben in 'Ausgeben.pas',
  Hauptfenster in 'Hauptfenster.pas' {Form1},
  gehezu in 'gehezu.pas' {gehzu: TFrame};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

Du hast 2 Mal! das Formular erstellt, also einmal rauslöschen.

Und wenn du 100 Edits brauchst dann erstell die doch dynamisch:

Delphi-Quellcode:

VAR I:Integer; newEdit:TEdit;
BEGIN
  FOR I := 0 TO 10
    DO BEGIN
      newEdit := TEdit.Create(Form1);
      newEdit.Name := 'eEingabe'+IntToStr(I);
      newEdit.Parent := Form1;
      newEdit.Top := I * 30 + 8; {Abstand in Abhängikeit von I}
      newEdit.Left := 8;
      newEdit.Width := 100;
      {Hier kannst du noch weitere Eigenschaften/Methoden deklarieren}
      newEdit.Show;
    END;

Zugreifen kannst du auf die Editfelder da du wie im designer einen Namen vergeben hast mit:

Delphi-Quellcode:

BEGIN
  newEdit := (Form1.FindComponent('eEingabe0') AS TEdit); // "Typecast" mit TEdit ist nötig damit man weiß um was es sich handelt.
  newEdit.Text := 'Neuer Text';
END;