Control in eine fremde Anwendung bringen???

[merovingian]

Hallo,

es muß doch irgendwie möglich sein, irgendein Control (zb. einen Panel) in einer Fremden Anwendung zu erzeugen. Es gibt doch zb auch einige Programme, die ToolBars oder ähnliches in anderen Programmen anlegen, obwohl das Programm keine Schnittstelle oder ähnliches dazu anbietet?? Wie geht sowas?

[NeoXX]

Man kann die Parent-Eigenschaft eines existierenden Controls auf das Fenster-Handels einer anderen Anwendung "umbiegen". Das Control ist dann ein "Kind" der anderen Anwendung, gehört aber noch zur eigenen.
d.h. Man kann es von der eigenen Anwendung wie gewohnt steuern und wenn die eigene Anwendung geschlossen wird, wird auch das Control geschlossen.

Hier der Code zum ändern der Parent-Eigenschaft:

Delphi-Quellcode:

Windows.SetParent(Pnl.Handle, Hnd);

[Luckie]

Zitat:

Zitat von merovingian

Es gibt doch zb auch einige Programme, die ToolBars oder ähnliches in anderen Programmen anlegen, obwohl das Programm keine Schnittstelle oder ähnliches dazu anbietet??

´
Das wäre mir neu.

Aber egal. Und wie soll es weitergehen, wenn du Schaltfläche auf dem fremden Fenster hast? Ein KLick auf den Button löst eine WM_COMMAND Nachricht aus, welche an das Parentfenster gesendet wird. Gut und dann? Woher soll das fremde Fenster wissen, was es machen soll, wenn dein Button geklickt wird? Man könnte die Fenster-Prozedur des fremden Fensters subclassen. Aber dazu musst du eine DLL in den Adressraum des Prozesses injezieren, denn von "außen" kommst du da nicht dran.

Deswegen: Was soll das werden und warum willst du eine eigene Schaltfläche in einem fremden Programm haben?

[merovingian]

Hallo,

also weniger ein Button werden, mehr eine Komponente, die ich von TPanel zum Anzeigen von Bildern u. Videos abgeleitet hab. Der Grund dafür ist ein Werbekontept ähnlich wie es zb. bei Kazaa ist, dass also Werbebanner in jeglicher Form an bestimmten Stellen im Programm eingeblendet werden können. Ich will damit nicht irgendwelche Anwendungen mit Werbung vollstopfen, nur soll es eben möglich sein, diese Komponente ohne Änderung der Quellcodes unterzubringen.

Die Zeichenvorgänge werden ja dann vom Programm selbst gesteuert (eigentlich schon, oder?). Und den Klick wollte ich dann mittels einem Hook abfangen und die Auswertung / Identifizierung über die ControlID bzw. das Handle machen und darauf hin die entsprechnde Aktion auslösen. Dazu soll das ganze dienen, nur bin ich im PSDK nicht wirklich weitergekommen um mein Problem zu lösen.

[Luckie]

Ich freue mich über jeden neuen Hook im System. :evil:

[merovingian]

Naja komm, ein Hook ansich ist ja nichts schlimmes wenn er sauber und unschädlich arbeitet und immer schön CallNextHookEx aufruft, oder ???? So und jetzt geh ich meinem Ansatz mal weiter nach ... ich hoffe, du lässt mich am Leben :? Luckie, wenn ich morgen nochmal nachfragen sollte ???

[NeoXX]

Das mit dem "Umbiegen" des Parents funzt wunderbar. Ich kann jegliche Controls von meinem Fenster auf ein anderes umlegen. Ich kann dann auch alles mit dem jeweiligen Control machen, was ich auch in der eigenen Anwendung machen könnte.
Ok, ich bekomme keine Botschaften mehr vom Control, das wird in diesem Fall ja aber auch nicht gebraucht (wobei, ein Schließen-Knopf wäre sinnvoll :!: ).

Mit dem folgenden Code kann man das Control bei Bedarf auch wieder zurückholen (solange das andere Fenster sammt dem Panel nicht geschlossen wurde):

Delphi-Quellcode:

var
  Hnd: HWnd = 0;

...

procedure TForm1.Button1Click(Sender: TObject);
begin
  if (Hnd = 0) then Hnd := FindWindow(nil, 'Arbeitsplatz');
  if (Hnd <> 0) then
    Hnd := Windows.SetParent(Panel1.Handle, Hnd)
  else
    ShowMessage('Öffne mal den Arbeitsplatz und versuchs dann nochmal!');
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Panel1.Color      := not Panel1.Color;
  Panel1.Font.Color := not Panel1.Color;
  Panel1.Caption    := Format('Parent: %d', [GetParent(Panel1.Handle)]);
end;

Übrigens, ich hasse Werbebanner :evil:

[Luckie]

Zitat:

Zitat von merovingian

Naja komm, ein Hook ansich ist ja nichts schlimmes

Jeder Hool belastet das System. Nachrcihten müssen ja immer noch durch zusätzlichen Code geschleift werden.

Zitat:

Ok, ich bekomme keine Botschaften mehr vom Control

Eben und wie willst du da auf einen Klick oder ähnliches reagieren?

[merovingian]

Hallo,

Zitat:

Zitat von NeoXX

Das mit dem "Umbiegen" des Parents funzt wunderbar. Ich kann jegliche Controls von meinem Fenster auf ein anderes umlegen.

Komisch, dass war eigentlich mein erster Gedanke .. nur da hats nicht funktioniert. Naja, dann werd ichs nochmal probieren.

Zitat:

Zitat von NeoXX

Übrigens, ich hasse Werbebanner

Tja, das geht wohl allen so (mir auch). Nur wenn du dafür ein Programm kostenlos nutzen kannst und den Programmierer bei seiner Weiterentwicklung unterstützt, sieht die Sache schon anders aus. Oder möchstest du gerne dem Entwickler der Freeware, die du nutzt, die Traffickosten / Webspace / etc. bezahlenden. Was vielen nicht klar ist... wenn man etwas wirklich sinnvolles programmiert, was dann auch von vielen genutzt wird entstehen ein Haufen Unkosten, die gedeckt werden müssen. Und wenn man dann seine Software schon kostenlos anbietet, dann kann man das ja wenigsten auf diese Weise regeln?!?!

Zitat:

Zitat von Luckie

Jeder Hool belastet das System. Nachrcihten müssen ja immer noch durch zusätzlichen Code geschleift werden.

Eine zusätzliche Belastung ist es ganz sicher, nur geht der Trend dahin, dass immer mehr Benutzer HighEnd Pc´s haben ... und da ist die Frage dann, wie stark diese Belastung auffällt. Und die meisten Programme brauchen keine Hooks, um ihre Funktion zu erfüllen... daher dürfte die Anzahl der gesetzen Hooks relativ gering bleiben.

Zitat:

Zitat von Luckie

Eben und wie willst du da auf einen Klick oder ähnliches reagieren?

Und da kommt dan der Hook ins Spiel :lol:

[Luckie]

Zitat:

Zitat von merovingian

Eine zusätzliche Belastung ist es ganz sicher, nur geht der Trend dahin, dass immer mehr Benutzer HighEnd Pc´s haben ... und da ist die Frage dann, wie stark diese Belastung auffällt. Und die meisten Programme brauchen keine Hooks, um ihre Funktion zu erfüllen...

Tja und dann beschweren sich die Leute immer, dass die Hardwareanforderungen in den Himmel wachsen.

Zitat:

daher dürfte die Anzahl der gesetzen Hooks relativ gering bleiben.

Aber nicht, wenn alle so denken wie du und ich befürchte es gibt schon mehr Hooks im System als wir uns träumen lassen.

Und Hooks können ziemlich gefährlich sein. Ich hatte ein Messenger Programm. Das hat wohl auch einen Hook installiert oder so was. Jedenfalls jedesmal, wenn ich im Explorer eine Datei oder Ordner mit der Rechten Maustaste angeklickt habe ist der Messenger mit einer Exception abgestürzt. :evil: Ich brauche wohl nicht zu erwähnen, dass er ziemlioch schnell wieder runter war.

[mirage228]

Zitat:

Zitat von Luckie

Und Hooks können ziemlich gefährlich sein. Ich hatte ein Messenger Programm. Das hat wohl auch einen Hook installiert oder so was. Jedenfalls jedesmal, wenn ich im Explorer eine Datei oder Ordner mit der Rechten Maustaste angeklickt habe ist der Messenger mit einer Exception abgestürzt. :evil: Ich brauche wohl nicht zu erwähnen, dass er ziemlioch schnell wieder runter war.

Hm, ICQ hat doch nen Hook für den Context-Menü Handler ("ICQ - Send to User"), damit immer alle online-User angezeigt werden oder?

mfG
mirage228

[Luckie]

Es war ein anderer Messenger. Aber das tut nichts zum Thema. Ich wollte nur zeigen, dass man mit Hooks sehr vorsichtig sein sollte, da es ein nicht gerader oberflächlicher Eingriff in das System bedeutet.

[merovingian]

Hallo,

Zitat:

Zitat von merovingian

ein Hook ansich ist ja nichts schlimmes wenn er sauber und unschädlich arbeitet und immer schön CallNextHookEx aufruft

wie gesagt... und das ganze ist natürlich auf freiwilliger Basis. Wers nicht installieren will kanns auch lassen.

[NeoXX]

Zitat:

Zitat von merovingian

Komisch, dass war eigentlich mein erster Gedanke .. nur da hats nicht funktioniert. Naja, dann werd ichs nochmal probieren.

Hat's mitlerweile funktioniert?
Wenn nicht, hast Du auch die Windows-API von SetParent und nicht die Delphi-Eigene benutzt? Also damit war's bei mir kein Problem. Hilft übrigens auch um nervige Werbebanner oder Popups in einen Panel gefangen zu halten.

Delphi-Quellcode:

HWND SetParent(
     HWND hWndChild,   // handle of window whose parent is changing
     HWND hWndNewParent    // handle of new parent window
    );

Delphi-Quellcode:

procedure SetParent(AParent: TWinControl); virtual;?

Zitat:

Zitat von merovingian

... wenn man etwas wirklich sinnvolles programmiert, was dann auch von vielen genutzt wird entstehen ein Haufen Unkosten, die gedeckt werden müssen.

Ok das seh ich ja auch ein, arbeite ja selbst als Programmierer und möchte ja auch meinen Lohn haben (um mein INet bezahlen zu können ;). Kleine Werbebanner die nicht stören (siehe Opera 7.51) sind auch ok und bringen auch Geld, aber Werbe-Klumpen, mit Aussagen wie "Wollen Sie 10.000 € im Monat von zu hause aus verdinen?!", die dann auch noch blinken und wackeln brauch ich wirklich nicht. Das animiert mich auch nicht dazu das Produkt doch lieber zu kaufen, dann schon eher zum Wechsel.
Stimmt das Preis-Leistungs-Verhältnis würde ich auch die Werbung "wegkaufen" und somit die Programmier, Tester, Vertreiber, und die sonst noch dazu gehören, unterstützen.

Zitat:

etwas wirklich sinnvolles

daraus resultiert:
'von vielen genutzt' * angemessener Preis = ein Haufen Kohle für 'ein Haufen Unkosten'[/b]
z.B. Opera für 34,00€ bzw. 22,99€ - find ich fair

[NeoXX]

Zitat:

Zitat von Luckie

Eben und wie willst du da auf einen Klick oder ähnliches reagieren?

Keine Ahnung :oops: ... über einen umwegigen Umweg vieleicht!? :gruebel:

Kann man vieleicht "einfach" nur global Mausbotschaften abfangen? Dann prüfen ob es das Fenster, auf dem der Banner liegt, den Focus hat, die Mauskoordinaten zur Position des Panels passen und dann, wenn alles passt, irgendwas tun (so viele Kommas in einem Satz, wenn eins falsch ist - Neue Retschreibung :mrgreen: ).

[Tubos]

Ja, das geht - entweder über Hooks oder du fragst alle 10 Millisekunden den Mausstatus über GetAsyncKeyState ab.
Möglichkeit Nr. 1 ist ziemlich kompliziert und wie gesagt eine Systembremse, Möglichkeit 2 kannst du gleich vergessen weil es den Computer ziemlich auslastet.

[NeoXX]

Hey, hier noch ein Lösungsvorschlag ohne Hooks und ohne Timer dafür aber mit Botschaftenbehandlung.
Warum nur ein Control in das fremde Fenster umschieben und nicht gleich das ganze Formular. Wenn ich das Handle des eigenen Fensters auf das des anderen Fensters setze ist es ein "Kind" dessen (im Vordergrund) und erhält z.B. Klick-Botschaften auf die es reagieren kann.

siehe Screenshot...

[merovingian]

Hallo,

ansich eigentlich praktisch und gar nicht schlecht. Nur muß man vieleicht bei manchen Programmen dann Fenster immer umschieben um die verschiedenen Schaltflächen etc. zu erreichen. Dem wollte ich eigentlich vorbeugen, indem das entsprechende Control irgendwo fest platziert wird. Das Control soll deshalb seine eigene Ereignisbehandlungsroutinen bekommen.

[NeoXX]

Na Du kannst das Fenster doch in dem anderen Fenster genau so fest platzieren wie jedes andere Control. Du kannst doch Größe u. Position Deines Fensters so anpassen das es nichts verdeckt und niemanden stört. Dann änderst Du die Eigenschaft BorderStyle auf bsNone und schon sieht's aus wie n' fester Panel. :wink:
Und das Control hat seine eigene Ereignisbehandlungsroutinen!?
Hast Du Dir den Screenshot angesehen? Wenn man da auf das Image klickt passiert was. Genau so kannst Du auf Botschaften (Veränderungen) des Fensters reagieren.

[Neutral General]

Kann man auch Controls von anderen Anwendungen von denen man das Handle hat "verschieben" ?

[NeoXX]

Da es sich bei

Code:

 SetParent

um eine Windows-API-Funktion handelt ist es prinzipiell mit jeglichen Windows-Controls, also alles was selbst ein Handle hat, möglich.

Ich kann mir nur gerade nicht vorstellen wofür man das braucht wenn nicht für böswilligen Kot. :gruebel:

[chkdsk]

Zitat:

daraus resultiert:
'von vielen genutzt' * angemessener Preis = ein Haufen Kohle für 'ein Haufen Unkosten'[/b]
z.B. Opera für 34,00€ bzw. 22,99€ - find ich fair

Um mal schön OT zu sein:

Opera würde ich nichtmal geschenkt nehmen!
Es ist - entgegen seiner Versprechen - deutlich langsamer als der Microsoft Internet Explorer (man muss sich ewig die Ladeanzeige angucken, und bis dann die Seite mal - zunächst mit Falscher schrift, falschen Proportionen, etc. - geladen ist), hat auf vielen Seiten deutliche Darstellungsfehler, und viele Features einfach nicht eingebaut. Das Surfen ist damit nicht einfacher oder schneller, im Gegenteil! Das Werbebanner krönt die Unverschämtheit der Programmierer, ein solch unvollkommenes Programm auch noch VERKAUFEN zu wollen, mit penetranter visueller Belästigung, und Riesen-Bannern, die im Hintergrund geladen werden!
FireFox ist da schon besser, von der Geschwindigkeit her wirklich in einer Liga im Microsoft Internet Explorer, weist allerdings gelegentlich Darstellungs-Fehler auf (z.B. auf einigen DHL-Seiten), ansonsten sehr brauchbar.

Also Werbebanner haben in auf meinem System nichts verloren, die werden entfernt (...), und dann werde ich das Programm ganz sicher nicht mehr kaufen, sofern ich es überhaupt noch benutze.

[NeoXX]

Also dazu kann ich nur sagen dass, wenn man nicht grade mit 56k surft, Opera keineswegs langsam ist oder dass es besonder viele Seite grafisch falsch darstellt. Ok, es ist vieleicht etwas langsamer als der iNet-Explorer, der dafür allerdings auch keinen eMail-Clienten, keinen Downloadmanager usw. beinhaltet. Ganz abgesehen von der allgemein bekanntlichen Sicherheit des Microsoft-Browsers.
Wie Firefox ist kann ich leider nicht sagen, wird aber wie jede Software (dazu zähle ich auch Opera ;) auch irgendwelche Ecken und Kanten haben. Er hat sicherlich Vorteile aber garantiert auch Nachteile.

Ich denke einfach dass jeder es selbst entscheiden sollte, was er braucht, was er gut findet und vor allem was er für die von ihm eigesetzte Software ausgeben bzw. (werbetechnisch) in kauf nehmen würde. Ob ich nun das MS-Paket, welches aus mehreren Einzelprogrammen besteht (iNet-Expl., Outlook, ups Dowloadmanager :gruebel: ), nutze oder ob ich das Koplettpaket (z.B. Opera)nehme ist ja eigentlich nur Erfahrungs- und Ansichtssache.

Es liegt mir fern hiermit eine unendliche Diskussion über "gute" und "schlechte" Software zu entfachen oder irgendwelche Software in den Dreck zu ziehen bzw. in den Himmel zu heben.

[NeoXX]

PS: Zum Thema Firefox...

Schon bei der Installation ist mir eine kleine Ecke ins Auge gefallen. Wenn ich, wie allgemein üblich, einen anderen als den vorgeschlagenen Pfad nutzen möchte und auf den Browse-Button klicke, wird mir als erstes mein Standard-Temp-Verzeichnis vorgeschlagen. Da ich die Software natürlich auch nicht dorthin haben möchte browse ich durch meine Ordnerstruktur und will logischer Weise noch einen Unterordner erstellen. Genau das geht nicht! Ich muss den Ordner händig anlegen sodass ich ihn dann auswählen kann.
Einfachste und grundlegenste Funktionen einer Installationsroutine :wink:

Musste jetzt sein...

[MartinA]

Zitat:

Zitat von chkdsk

FireFox ist da schon besser, von der Geschwindigkeit her wirklich in einer Liga im Microsoft Internet Explorer, weist allerdings gelegentlich Darstellungs-Fehler auf (z.B. auf einigen DHL-Seiten), ansonsten sehr brauchbar.

Die Aussage so herrlich unkorrekt, daß es einer Klarstellung bedarf. Nicht der Browser zeigt falsch an die Seite ist falsch. Standard sind immer noch die W3C Richtlinien und überprüf mal die DHL Seite darauf hin. Da gibts auch einen Test irgendwo im Netz (hab leider url nicht greifbar :( ) ...

Der Fehler besteht also eigentlich darin, daß die Seite im Explorer "richtig" angezeigt wird. Den Umstand interpretieren leider sehr viele falsch ;)

Gruß
Martin

[Christian Seehase]

Moin Zusammen,

werdet bitte mal wieder On Topic, oder verlagert die Browser Diskussion in einen neuen Thread (K&T wäre hier wohl passend).
Danke.