Einzelnen Beitrag anzeigen

Benutzerbild von juergen
juergen

Registriert seit: 10. Jan 2005
Ort: Bönen
1.165 Beiträge
 
Delphi 11 Alexandria
 
#1

ShellExecute() mit Parameter für Adobe klappt nicht

  Alt 1. Nov 2009, 14:41
Hallo zusammen,

per Doppelklick auf ein Listbox.Item öffne ich die ausgewählte Datei mit Adobe
(Listbox.Item=Dateiname; in einer Stringlist ist dann der komplette Pfad+Dateiname)
Soweit kein Problem.
Nun möchte ich Adobe noch einen Parameter übergeben (Adobe-Parameter).
(über "search" soll Adobe mit dem Suchfenster geöffnet werden und alle gefundenen Wörter angemakert haben...)

Eine Parameterübergabe bietet ShellExecute ja an.
Ich bekomme es aber leider nicht hin und ich weiß nicht warum.

Nachfolgend eine meiner vielen Varianten:
(ohne /A hatte ich auch schon probiert)
Delphi-Quellcode:
var
  my_h: THandle;
  Searchstring: string;
begin
  Searchstring := Edit2.Text;
  my_h := ShellExecute(0, 'open', PChar('"' + (Listbox_Form.My_StringList_PfadUndDatei[gi_helpindex]) + '"'),
    PChar('/A search="' + (Searchstring) + '"'), nil, SW_SHOWNORMAL);
  if my_h <= 32 then
    ShowMessage(SysErrorMessage(my_h));
end;
Adobe öffnet die ausgewählte Datei "ganz normal" ohne das Suchfenster, bzw. auch ohne Markerung der gefundenen Wörter...(als ob der Parameter gar nicht erkannt wird)

Erkennt hier jemand das Problem?

Vielen Dank schon mal vorab!
Jürgen
Indes sie forschten, röntgten, filmten, funkten, entstand von selbst die köstlichste Erfindung: der Umweg als die kürzeste Verbindung zwischen zwei Punkten. (Erich Kästner)
  Mit Zitat antworten Zitat