Registriert seit: 16. Apr 2007
2.325 Beiträge
Turbo Delphi für Win32
|
Re: Überprüfen, ob Variable einem gewissen Typ entspricht
21. Mai 2007, 19:12
Delphi-Quellcode:
procedure TForm1.EingabePruefen;
var h:float;
begin
if not TryStrToFloat(edit1.text,h) then
begin
showmessage('Sie Schuft! Geben Sie gefälligst eine gültige Fließkommazahl ein!');
edit1.text:='';
end;
end;
Der Text der MessageBox ist natürlich nach Belieben
Wer erweist der Welt einen Dienst und findet ein gutes Synonym für "Pointer"?
"An interface pointer is a pointer to a pointer. This pointer points to an array of pointers, each of which points to an interface function."
|