Einzelnen Beitrag anzeigen

marcibaer

Registriert seit: 27. Sep 2006
Ort: Inden
75 Beiträge
 
Delphi XE2 Professional
 
#3

AW: Übergabe von Daten an eine Callback-Funktion

  Alt 4. Mär 2011, 15:58
Das ist mir grundsätzlich schon klar!

Ich will die Funktion "SelectFolderDialogExt" und somit ja auch "BrowseCallbackProc" von mehreren Stellen aus mit unterschiedlichen "Suchkriterien" aufrufen.

Hier der Ausschnitt aus meiner veränderten "BrowseCallbackProc":
Delphi-Quellcode:
    BFFM_SELCHANGED:
      begin
        pIDL := Pointer(lParam);
        if Assigned(PIDL) then
          begin
            SHGetPathFromIDList(pIDL, DirName);
            SendMessage(hwnd, BFFM_ENABLEOK, 0, Ord(FileExists(DirName+'\bblabla.txt'));
         end;
      end;
Mein Problem ist nun, wie übergebe ich den Dateinamen oder meinetwegen auch verallgemeinert eine TStringList an die Callback-Funktion, deren Paramer doch fest vorgegeben sind, oder!?
Also wie kriege ich
  SendMessage(hwnd, BFFM_ENABLEOK, 0, Ord(FileExists(DirName+'\'+Dateiname)); hin.
Marc
  Mit Zitat antworten Zitat