Überprüfen ob etwas im Textfeld steht und entsprechende vorg

[Sharky]

Hai gonium,

ersteinmal: "Herzlich Willkommen in der Delphi-PRAXiS" und froh Weihnachten

Zuerst einmal zu deiner Frage:

Es gibt grundsätzlich zwei wege zu prüfen ob etwas in einem Edit-Feld steht. Du kannst prüfen ob der Inhalt leer ist oder ob die Anzahl der Zeichen = 0 ist.

In Delphi sähe das dann so aus:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if (Edit1.Text = '') then // Den Inhalt (Edit.Text) prüfen
  begin
    ShowMessage('In Edit1 seht nichts');
  end;

  if (Length(Edit2.Text) = 0) then // Die Anzahl der Zeichen (Length) prüfen
  begin
    ShowMessage('In Edit2 stehen null Zeichen');
  end;
end;

Achja,
Du hast einen Link zu dem Programm in deinem Posting. Bei mir funktioniert dieser nicht. Einfacher und auch "sicherer" ist es wenn Du das Programm einfach an dein Posting anhängst. Dafür gibt es den Button "Durchsuchen" und dann "Attachment hinzufügen" unter dem Beitragseditor.