Halloooooooo erstmaaaaal
also ich hab folgendes:
Code:
procedure TForm1.FormActivate(Sender: TObject);
begin
with DataModule9 do
begin
Table2.Open;
if Table2.FindKey([meld]) then
begin
if
MessageDlg('Name existiert schon.'+#13+' Neuen Namen eingeben?',
mtConfirmation, [mbYes,mbNo], 0) = mrYes then
begin
meld:=inputbox('Eingabe','Bitte den Namen eingeben!','');
end;
end;
end;
Label16.Caption := meld;
end;
wie oben zu sehen wird beim FormActivate(hallo spocki
) geprüft ob der im inputbox eingebene Name existiert, der MessDlg meldet das Ergebnis.
Wenn der User auf ok klickt wird diese input wiederholt.
So...und wenn nun der Name wider existiert gehts trotzdem normal weiter.
Also wie kann ich sozusagen ein return zum Anfang der Formactivate machen?
Weiss jeder jetzt was ich meine
ich glaube ich verstehe
es selbst nicht
Was?Wie??Wo???
Ach hier..jaja..komme gleich...
bis denne!