TEdit leer??

MKSlayer · Verfasst: Di 08.07.08 12:36

Also ich habe folgendes Problem will es 5 edit komponenten was an ne DB schicken nun möchte ich aber vorher prüfen ob in den Edit komponenten etwas drin steht,.

kann man das irgendwie überprüfen

Gausi · Verfasst: Di 08.07.08 12:39

if (edit1.text = '') or (edit2.text = '') then ...

Ggf. in Verbindung mit Trim.

_________________
We are, we were and will not be.

MKSlayer · Verfasst: Di 08.07.08 12:58

achso einfach geht das,,, alles klar danke dir

Ehemaliges Mitglied Erhaltene Danke: 1

Sollten die Eingabefelder fortlaufen durchnummeriert sein geht es auch so:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  for i := 1 to 3 do
  begin
    if Tedit(FindComponent('edit' + InTtoStr(i))).Text = '' then
    begin
      ShowMessage(Format('Eingabefeld Nr. %d ist leer.', [i]));
    end;
  end;
end;

Yogu · Verfasst: Di 08.07.08 15:37

Luckie: Das hieße ja, dass die Komponenten Edit1, Edit2 und Edit3 heißen. :roll:

Hidden · Verfasst: Di 08.07.08 15:39

imho wenn es so sein soll einfach einmal ein Array of TEdit definieren :!:

_________________
Centaur spears can block many spells, but no one tries to block if they see that the spell is a certain shade of green. For this purpose it is useful to know some green stunning hexes. (HPMoR)

Blackheart666 · Beiträge: 2195 XP D3Prof, D6Pers.

Yogu hat folgendes geschrieben:

Luckie: Das hieße ja, dass die Komponenten Edit1, Edit2 und Edit3 heißen. :roll:

Edit nicht unbedingt aber durchnummeriert. :wink:

_________________
Blackheart666
Der Irrsinn ist bei Einzelnen etwas Seltenes, - aber bei Gruppen, Parteien, Völkern, Zeiten die Regel. (Friedrich Nietzsche)

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme