morgen...
ich schreib grad ein kleines programm... und weiss nicht wo der Fehler sein koennte.
Ich bekomme immer folgende Fehlermeldung wenn ich einen eigenen typ benutzen will:
[Pascal Error] Unit2.pas(1): Unable to invoke Code Completion due to errors in source code
Z.B. bei so was:
db.??? (ist bei mir ein typ von Tdb) Normalerweiser werden ja die Parameter angezeigt, die mir zur verfuegung stehen oder nicht?
das ist meine
unit:
Delphi-Quellcode:
unit Unit2;
interface
type
nummern =
Set of 0..9;
Tzeit =
record
hour : Integer;
min : Integer;
sec : Integer;
mill : Integer
end;
Tuntertitel =
record
nummer :
String[5];
start : Tzeit;
ende : Tzeit;
s1 :
string;
s2 :
string;
s3 :
string;
s4 :
string;
end;
Tdb =
Array[1..1000]
of record
high : integer;
tt : Tuntertitel;
end;
implementation
procedure oeffnen(filename :
string;
var db : Tdb);
Var
f :
file ;
zeile :
string;
i,j : integer;
BEGIN
//-----reseten-------------------
i := 0;
j := 0;
Assignfile(f,filename);
Reset(f);
while not eof(f)
do
begin
i := i+1;
readln(f,zeile);
IF StrToInt(zeile[1])
in nummern
THEN
BEGIN
db(i).tt.nummer := zeile;
readln(f,zeile);
END;
end;
END;
end.
Ich hoffe ihr versteht mein problem und hab noch lust mir zu helfen