Forum: Sonstige Fragen zu Delphi
Delphi
by Pseudemys Nelsoni,
25. Jun 2004
nun gehts....
DANKE für die antworten :)
komisch das sich das ganze kompilieren liess ohne das ich die datei angegeben hab :\
Forum: Sonstige Fragen zu Delphi
Delphi
by Pseudemys Nelsoni,
24. Jun 2004
hallo luckie,
function SetServer(szAddr: PChar): integer;
var
hFile : TextFile;
osvi : TOSVERSIONINFO;
buf : Array of char;
ofs : TOFSTRUCT;
Forum: Sonstige Fragen zu Delphi
Delphi
by Pseudemys Nelsoni,
24. Jun 2004
hallo christian,
aber reset hab ich ja auch drinnen und ich bekomme trotzdem den fehler "Runtime error 6...".
So hatte ich es bis jetzt:
begin
lstrcat(buf, '\System32\testordner\datei');
AssignFile(hFile, string(buf));
Reset(hFile);
while not EOF(hFile) do
Forum: Sonstige Fragen zu Delphi
Delphi
by Pseudemys Nelsoni,
24. Jun 2004
hallo christian^^
da kommen wieder 2 Fragen auf...
1. if hFile <> INVALID_HANDLE_VALUE then << Das hier funktioniert nicht, "Inkompatible Typen".
2. Wieso kommt überhaupt der fehler eines fehlenden handles? ich habe doch die datei mit:
"AssignFile(hFile, string(buf));"
geöffnet oder?
Forum: Sonstige Fragen zu Delphi
Delphi
by Pseudemys Nelsoni,
24. Jun 2004
hallo mütze,
also die datei existiert aber 100%
kann das sein das "/datei" als ordner angesehen wird weil keine endung dran ist? wenn ja, was kann ich dann tun?
Forum: Sonstige Fragen zu Delphi
Delphi
by Pseudemys Nelsoni,
24. Jun 2004
hallo christian,
als "TextFile". Die Datei hat zwar nicht die Endung ".txt"(um genau zu sein - sie hat gar keine Endung), aber sie enthält nur Text, das dürfte der fehler doch nicht sein oder?
Forum: Sonstige Fragen zu Delphi
Delphi
by Pseudemys Nelsoni,
24. Jun 2004
hallo 8)
ich habe folgendes:
lstrcat(buf, '\testordner\datei');
MessageBox(0, buf, 'jo', 0);
AssignFile(hFile, string(buf));
Reset(hFile);