Ich habe folgendes Problem:
Ich möchte auf Daten in einer CSV_Datei zugreifen. Um dies möglichst komfortable zu gewährleisten, habe ich ein Objekt erstellt TCSVManager. Dieses Objekt besitzt u.a. das Attribute FFile vom Typ TextFile mit der
CSV-Datei.
Code:
TCSVManager = class(TComponent)
private
FFile: TextFile;
Protected
Function GetColNo: Integer;
...
end;
Nun mein Problem:
Delphi-Quellcode:
function TCSVManager.GetColNo: Integer;
var S: String;
begin
Seek(FFile, 0);
ReadLn(FFile, S);
Result := Explode(S, ';').Count;
end;
Wenn ich in der Funktion die Procedure System.Seek verwenden will, um die Position auf die Zeile in der Datei zu bestimmen, dann nervt mich Delphi mit einer
Exception “Inkompatible Typen“, welche ich mir hier nicht erklären kann. Wenn ich meiner Literatur und dem
Delphi Forum / Suche: "TextFile" AND "Seek" folge, dann müsste ich die Prozedure Seek mit Textfilen verwenden können. Aber wo liegt dann das Problem???
Also, wenn hier einer eine Idee hat, dann wäre ich sehr dankbar.
Greetings Scouty