Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Grolle,
30. Okt 2005
Jetzt komme ich irgendwie nicht weiter. Die Funktion sieht jetzt so aus:
function TForm1.CheckInput : boolean;
begin
if Edit15.Text = '' then
begin
Edit15.Text := '--.00:00';
Result := false;
end
else
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Grolle,
26. Okt 2005
Das Problem ist, das die ganzen OnExits auf verschiedene Werte überprüft werden,
oder habe ich dich da falsch verstanden?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Grolle,
26. Okt 2005
Das habe ich mir auch gedacht. Wenn ich allerdings OnExit
vor dem Speichern auslöse, wird der Focus zurückgesetzt (richtig),
aber der Savdialog wird auch runtergerattert (soll er dann aber
nicht). :gruebel:
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Grolle,
26. Okt 2005
Hallo!
Ich habe einige Editfelder auf einer Form liegen. Diese werden im onExit auf
ihre Korrektheit geprüft. Das passiert aber nicht, wenn ich diese übers Mainmenü
speichere (der Fokus bleibt erhalten). Wie kann ich das ändern? Hier mal nen
onExit-Ereigniss:
procedure TForm1.Edit16Exit(Sender: TObject);
begin
try
if (StrToInt(Edit16.Text)< 200) and not (StrToInt(Edit16.Text)= 0)then