lässt sich mit diesem tip auch eine (die komponente heisst) AfxFrameOrView42s auslesen?
http://www.delphipraxis.net/internal...ect.php?t=7025

viele grüsse
aaron

Wie wäre es mit Copy&Paste und einem Test Da kaum jemand die Komponente, welche Du ansprichst haben wird, wäre das die sinnvollste Art&Weise es herauszufinden und schneller als auf eine Antwort zu warten

......

P.S.: Der Titel ist nicht wirklich aussagekräftig - oder weiß jeder aus Anhieb was in dem Tipp drinne stand?

was meinst du mit copy&paste?
hier wird sich auch mit dieser komponente beschäftigt, vielleicht ist das ja verständlicher
http://www.google.de/search?q=cache:...B+delphi&hl=de
das hatte ich auch zu dem thema gefunden

zusammenfalten · markieren

Delphi-Quellcode:

function BKC_OnOpenCompose(hTargetWnd : HWND; nMode : Integer(* See COMPOSE_MODE_* in BeckyApi.h *)) : Integer; stdcall;
var
  hwndAttachList: HWND;
 // hImList: HIMAGELIST;
begin
  hwndAttachList := FindWindowEx(hTargetWnd, 0, 'AfxMDIFrame42s', nil);
  if hwndAttachList = 0 then
  begin
    Result := 0;
    exit;
  end;
  hwndAttachList := FindWindowEx(hwndAttachList, 0, '#32770', nil);
  if hwndAttachList = 0 then
  begin
    Result := 0;
    exit;
  end;
     end;

gruss aaron

Zitat von aaron:

was meinst du mit copy&paste?

Kopier den Source aus dem Beitrag den du verlinkt hast und teste ihn aus. Natürlich brauchst du auch die entsprechenden Komponenten (TreeView etc.)

Greetz
alcaeus

Ein Child mit der Klasse 32770 kommt mir etwas spanisch vor. Die Klasse haben eigentlich alle Dialoge, die mit dem VC Ressourcen Editor erstellt wurden. Button oder Edit wäre ein gebräuchlicher Klassenname für ein Child.

ich habe ihn ausprobiert...komme damit auf keinen grünen zweig.
child mit der klasse ist nur ein beipiel (s. link)
qqmainw:=FindWindowEx(qqmainw,0,'#32770',nil);
wenn ich copy und paste dann
habe ich bei
UnRegisterClass(wClass.lpszClassName,hInst); und bei
RegisterClass(wClass); folgende fehlermeldung

markieren

Delphi-Quellcode:

Erzeugen
  [Fehler] Unit1.pas(68): Record, Objekt oder Klassentyp erforderlich
  [Warnung] Unit1.pas(101): Konstantenausdruck verletzt untere Grenzen
  [Fehler] Unit1.pas(142): Operator oder Semikolon fehlt
  [Fataler Fehler] Project2.dpr(6): Verwendete Unit 'Unit1.pas' kann nicht compiliert werden

gruss aaron

markieren

Delphi-Quellcode:

qqmainw:=FindWindow('AfxFrameOrView42s',nil);
　qqmainw:=FindWindowEx(qqmainw,0,'AfxMDIFrame42s',nil);

qqmainw:=FindWindowEx(qqmainw,0,'AfxFrameOrView42s',nil);
　qqmainw:=GetNextWindow(qqmainw,GW_HWNDNEXT);
　qqmainw:=FindWindowEx(qqmainw,0,'#32770',nil);
　richedit:=FindWindowEx(qqmainw,0,'RICHEDIT',nil);

Wie man and diesem Schnipsel sehen kann, ist das erste Fenster ein MDI Parent, dort kann also durchaus ein #32770 als Child vorhanden sein. Die letzte Zeile sagt aus, das es sich bei dem Control, das den Text enthält um ein RichEdit handelt, dafür API-Funktionen zu finden dürfte kein grosses Problem sein.

EDIT: Bekomme übrigens keinen Fehler beim Code per Copy&Paste, anbei die .dpr. Gehts bei dir auch um ein Chat-Programm? Wen ja, welches?

danke, nun hat es mit dem copy & paste funktioniert.
aber...
das control, das den text enthält ist ein AfxFrameOrView42s und kein richedit, deshalb habe ich diesen beispielcode mit dem chat erst gefunden, es geht mir nicht um ein chat-programm.

Um welches Programm geht es denn? Wenn es Freeware/Shareware ist oder eine Trial im Injternet zu finden ist, könnte ich mir das ganze ja mal angucken, sonst kann ich ja nur weiter raten.
Bist du dir sicher, das der Text direkt auf einem AfxFrameOrView42s ist? Es kann doch sein, das er auf einem Child davon ist, diese werden nicht immer von den jeweiligen "Spy"-Programmen angezeigt.

es ist so wie bei dem "Das Telefonbuch für Deutschland" . das programm ist eine firmeninterne geschichte und ich kann sie deshalb nicht öffentlich machen.

markieren

Delphi-Quellcode:

983538: Afx:400000:b:10011:6:d0018d "Das Telefonbuch für Deutschland"
  983690: AfxMDIFrame42s
    721406: AfxMDIFrame42s
      918020: AfxFrameOrView42s

grüsse