Delphi Syntax

Hi Curtiss,

{ Ich barauche ne abfrage ob er eine datei öffnen konnte weil sonst schmiert mir das programm ab weil er sie nicht öffnen konnte. Ich habe mir dass so gedacht aber es funzt natürlich net ^^ : }

Für solche Fälle gibt es die Abfrage nach "IOResult":

AssignFile(Input,'Pfad/Datei.dat');
{$I-}
Reset(Input);
{$I+}
If IOResult <> 0 ShowMessage('Datei wurde nicht gefunden')
Else begin
  //was du willst
end;
CloseFile(Input);

{$I-} Schält die selbstständige Fehlererkennung ab.
{$I+} schält sie wieder ein.
Ist "IOResult" ungleich Null, so erscheint eine Selbst erstelle Fehlermeldung (ShowMessage).
Ist kein Input-Output Fehler vorhanden, so beginnt es mit der Abarbeitung deiner erwünschten Anweisungen.

Für das andere Problem weiss ich leider gerade keine passende Lösung.
Bin halt selbst noch n' Newbie ;-)

:.[terminated].:

thx mann!!!

Abba ich denke die andere bekomme ich von irgendeinem hier auch noch Gelöst!!! (hoffe ich doch. . .)

MFG

Hoffe mal, es kommt noch nicht zu spät:
Weiß jetzt blöderweise nicht wo der Unterschied zw. Delphi 1 und z.B. 4(mit der bin ich gestartet) ist, aber die Syntax wird ja wohl ähnlich sein.
Versuchs doch mal mit trunc(das schneidet die Nachkommastellen ab). Dann etwas in der Art:

if(a=trunc(a)) then //alles klar
               else //Fehler;

Soweit okay?