Einzelnen Beitrag anzeigen

Benutzerbild von toms
toms
(CodeLib-Manager)

Registriert seit: 10. Jun 2002
4.648 Beiträge
 
Delphi XE Professional
 
#3

Re: gibt es in delphi eine funktion die...

  Alt 16. Dez 2003, 11:09
Hi,

Das kannst du leicht mit der Val() Funktion überprüfen.
Diese veruscht einen String in einen Integer Wert umzuwandeln.
Schlägt dieser Versuch fehl, dann ist Code <> 0.


Delphi-Quellcode:
var
  I, Code: Integer;
begin
  Val('123a', I, Code);
  if Code = 0 then
    ShowMessage('String enthält nur Zahlen')
  else
    ShowMessage('String enthält Buchstaben');
end;
Thomas
  Mit Zitat antworten Zitat