AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Win32/Win64 API (native code) Delphi Controls in fremden Anwendungen erstellen
Thema durchsuchen
Ansicht
Themen-Optionen

Controls in fremden Anwendungen erstellen

Ein Thema von Dawn87 · begonnen am 11. Aug 2008 · letzter Beitrag vom 12. Aug 2008
Antwort Antwort
Dawn87

Registriert seit: 15. Feb 2007
Ort: Lüdenscheid
189 Beiträge
 
Delphi XE5 Professional
 
#1

Controls in fremden Anwendungen erstellen

  Alt 11. Aug 2008, 16:36
Hallo,

ich habe eine grundsätzliche Frage zur Windows API:

Ist es möglich das meine Anwendung ein Steuerelement in einem Fenster einer anderen Anwendung erstellt ohne das ich auf Techniken wie z.B. DLL Injection zurückgreifen muss?

Ich habe mal ein bißchen rumprobiert, konnte aber leider keinen Erfolg erzielen. Nun frage ich mich, ob ich einen Fehler in meinem Quellcode habe oder ob es eine grundsätzliche Einschränkung gibt.

Grüße,
Stefan
  Mit Zitat antworten Zitat
Benutzerbild von toms
toms
(CodeLib-Manager)

Registriert seit: 10. Jun 2002
4.648 Beiträge
 
Delphi XE Professional
 
#2

Re: Controls in fremden Anwendungen erstellen

  Alt 11. Aug 2008, 18:12
Zitat von Dawn87:
Ich habe mal ein bißchen rumprobiert, konnte aber leider keinen Erfolg erzielen. Nun frage ich mich, ob ich einen Fehler in meinem Quellcode habe oder ob es eine grundsätzliche Einschränkung gibt.
Hallo Stefan,


Deine Frage ist selbst mit der nicht beantwortbar. Du müsstest schon weitere Details liefern.
Wie sieht denn dein Quelltext aus, was hast du probiert?
Thomas
  Mit Zitat antworten Zitat
Benutzerbild von jfheins
jfheins

Registriert seit: 10. Jun 2004
Ort: Garching (TUM)
4.579 Beiträge
 
#3

Re: Controls in fremden Anwendungen erstellen

  Alt 11. Aug 2008, 18:44
Ich habe es geschafft - es ist also möglich

Das ist jetzt sicher nicht sauber, aber es hat funktioniert:
hwnd ist das Handle des parents
wwmenubtn ist eine Klasenvariable
Delphi-Quellcode:
if Hwnd <> 0 then
  begin
    WWMenuBtn := TButton.Create(Self);
    with WWMenuBtn do
    begin
      Left := 600;
      Top := 1;
      Width := 60;
      Height := 18;
      Caption := '&Plugins';
      Parent := nil;
      OldMenuBtnWndProc := WindowProc;
      WindowProc := MenuBtnWndProc;
      ParentWindow := MenuHwnd;
    end;
  end;


procedure TForm1.MenuBtnWndProc(var Msg: TMessage);
begin
  if Msg.Msg = WM_LBUTTONUP then
  begin
    Beep;
  end;

  OldMenuBtnWndProc(Msg);
end;
Nachteil: man muss die Messages umleiten um sie zu bekommen ...
  Mit Zitat antworten Zitat
Dawn87

Registriert seit: 15. Feb 2007
Ort: Lüdenscheid
189 Beiträge
 
Delphi XE5 Professional
 
#4

Re: Controls in fremden Anwendungen erstellen

  Alt 12. Aug 2008, 09:04
Hallo,

vielen Dank für eure Antworten.

Der Code funktioniert super. Ich habe in meinem Code das Umleiten der Nachrichtenschleife nicht getan.

@Toms:
Ist nur eine kleine Spielerei. Ich wollte einfach mal wissen in welchen Umfang man die Oberfläche einer anderen Anwendung manipulieren kann.

Grüße
Stefan
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 00:46 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz