mm ich probiere gerade (mit record) einen datensatz zu lesen und das dazugehörige programm auszuführen. das ergebnis beim record sollte die pfadangabe sein, welche gespeichert wird mit name und platz.
dies ist die prozedur um den pfad per combobox auszuführen. man klickt auf den eintrag in der liste und das programm wird gestartet. problem ist, wenn ich einen programmpfad starte bekomme ich einen i/o error 131
da ich nicht viel ahnung von records habe, weiß ich nicht woran es liegt und meine suche zu dem error hat nicht wirklich was ergeben => ich weiß also nicht mal was mir der error genau sagt
hoffe mir kann jemand helfen. (hab ein comment eingefügt an der stelle wo das problem auftritt)
Delphi-Quellcode:
procedure TForm1.ComboBox1Change(Sender: TObject);
var n : tName;
i : integer;
a : string;
gefunden : boolean;
Daten : tDatensatz;
begin
if not IndexDa then
exit;
n:=ComboBox1.Items.Strings[ComboBox1.ItemIndex];
i:=0;
gefunden:=false;
while not gefunden and (i<=drin) do
begin
gefunden:=Indexfeld[i].Name = n;
if not gefunden then
i:=i+1;
end;
if not gefunden then
Showmessage('Dieser Eintrag existiert nicht!')
else
begin
ReSet(Datei);
Seek(Datei,Indexfeld[i].Platz); //hier kommt das problem bzw. bleibt er hier stehen mit dem tollen error
Read(Datei,Daten);
CloseFile(Datei);
a:=Daten.Pfad;
WinExec('a', sw_shownormal);
end;
end;
falls ihr noch angaben braucht, nur her damit, weiß nicht was ihr wissen müsst um mir zu helfen
gute nacht, meine augen schmerzen schon nach einigem rumgetippse...
ps: hoffe das passt hier in die sparte
