Tworze program do katalogowania stron www w oparciu na plikach INI ( wiem że to <font color="red">marnotrastwo</span> pamięci i czasu). Po kliknięciu w listboksie na pozycje otwiera się strona w porzeglądarce internetowej. Aby <font color="red">użytkownik</span> mógł sobie wybrać w jakiej przeglądarce ma się otwierać strona dodałem w innym pliku INI lokalizacje do Przeglądarki. I natrafiłem na problem. Kliknięcie na pozycje powoduje błąd. Co jest nie tak w tym kodzie ?
procedure TForm1.ListBox1DblClick(Sender: TObject);
var INI : TINIFile;
P : PChar;
esa : String;
begin
INI := TINIFile.Create('Bazmo.baz'); //wczytanie do ListBoxa sekcji głownych adresów
DirI := TINIFile.Create('Bazconfig.pro'); // wczytanie pliku z konfiguracją programu
esa := DirI.ReadString('Explorer','dir',''); // przydzielenie lokalizacji programu internetowego do zmiennej
try
P := PChar('http:'+INI.ReadString(ListBox1.Items[ListBox1.ItemIndex], 'www', ''));
ShellExecute(Handle,'open',esa,PChar(P), nil, SW_SHOW);
finally
INI.Free;
end;
end;
Przepraszam, że ten kod jest napisany niepoprawnie. z góry dzięki za pomoc i chęci w poprawieniu tego [cya] [cya] [cya]