Jo, so ein ähnliches Problem habe ich auch, allerdings mit Delphi 5:
Bisher aufgefallen ist mir das bei den Funktionen Copy und
DeleteFile.
Wenn ich die einsetze, meckert der Compiler immer, das etwas nicht stimmt, z. B.:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
| procedure TEditForm.XmlParse;
VAR
Filename : STRING;
f : TEXTFILE;
BEGIN
Filename := ExtractFilePath (Application.ExeName)+'Contents.txt';
AssignFile (f, Filename);
TRY
Rewrite (f);
TRY
XmlParser.StartScan;
XmlParser.Normalize := FALSE;
WHILE XmlParser.Scan DO
IF (XmlParser.CurPartType = ptContent) OR
(XmlParser.CurPartType = ptCData) THEN
Write (f, XmlParser.CurContent);
FINALLY
CloseFile (f);
END;
XMLRichEdit.PlainText := TRUE;
XMLRichEdit.Lines.LoadFromFile (Filename);
EXCEPT
XMLRichEdit.Lines.Clear;
END;
SysUtils.DeleteFile(filename);
END; |
Entscheidend ist hier die letzte Zeile:
Wenn ich nur DeleteFile(filename) einsetze, meldet sich der
Compiler mit folgender Fehlermeldung:
Inkompatible Typen: 'String' und 'PChar'!
Achja, natürlich steht SysUtils in der Uses-Anweisung.
Tino
