Forum: Programmieren allgemein
by Natcree,
11. Mär 2013
stimmt hast recht. den setfocus auf edit hat er nicht gemacht. kahm fehler meldung
Forum: Programmieren allgemein
by Natcree,
11. Mär 2013
Das wars was mir gefehlt hat Danke
if edit3.Text = '' then
begin
if MessageBox(0, 'Eingabe erwartet', 'Fehler', MB_OK or MB_ICONERROR)= idok then exit
else
...
end;
Forum: Programmieren allgemein
by Natcree,
11. Mär 2013
wenn ich button2click ausführe soll er prüfen ob edit3.text='' ist. ist dies der fall dann soll er button2click nicht ausführen
Forum: Programmieren allgemein
by Natcree,
11. Mär 2013
Gut habs damit versucht
procedure TForm7.Button2Click(Sender: TObject);
begin
if edit3.Text = '' then
begin
MessageBox(0, 'Eingabe erwartet', 'Fehler', MB_OK or MB_ICONERROR);
edit3.SetFocus;
end
else
Forum: Programmieren allgemein
by Natcree,
11. Mär 2013
Ich habe einen Button der beim onclick ereignis ausgeführt wird
nun soll aber bevor er dies macht geprüft werden ob edit1.text='' ist dann soll die messagebox erscheinen und mit mb_ok den button1.click nicht ausführen und nochmals die eingabe für edit1.text ermöglichen. Habe alles versucht aber er führt die procedure button1click trotzdem aus