Hallo,
mir ist dieses Problem nicht aufgefallen, aber heute wurde es von einen
DP User gefunden. Folgendes: In einem Menü (MainMenu) kann man in die readme.txt einsichten. Doch wenn vorher das OpenDialog geöffnet und eine Datei angenommen wurde, dann kann ich die readme.txt, die ich über ShellExecute öffnen, nicht mehr öffnen.
Delphi-Quellcode:
{--[MMuReadClick]--------------------------------------------------------------}
procedure TMain.MMuReadClick(Sender: TObject);
begin
if Sender = MMuRead then
begin
if OpenDia.Execute then
begin
...
end;
end
else if Sender = MMuCopy then
begin
...
end
else if Sender = MMuExit then Close
else if Sender = MMuInfo then Info.ShowModal
// else ShellExecute(Application.Handle, 'OPEN', 'readme.txt', nil, nil, SW_NORMAL);
else ShellExecute(Application.Handle, nil, 'readme.txt', '', '', SW_NORMAL);
end;
Beide Varianten funktionen zunächst ohne Probleme, doch wie schon erwähnt, geht das nicht mehr wenn das OpenDialog geöffnet ist und eine Datei ausgewählt wurde. Ich nehme an das ShellExecute irgend ein Fehler erzeugt, doch welchen?
Hat jemand einen Rat?
Gruß
Mazel