Programm für schließung eines Programes in der Taskleiste rechts neben der Uhr

[Bummi]

Delphi-Quellcode:

type
  TForm1 = class(TForm)
    Button1: TButton;
    Button2: TButton;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private

    { Private-Deklarationen }
    PID:DWord;  // DAS FEHLT BEI DIR
  public
    { Public-Deklarationen }
  end;

[marco1204]

juhuuu
Danke Sir Rufo, durch deinen Tipp mit dem weglassen und so (hab mir nochmal alles genau verinnerlicht)
funktoniert alles

Auch wenn ich ein sehr schwerer Fall war und euch alle genervt hab
Danke
Hoffe ich bin für neue Fragen irgendwann trotzdem WIllkommen.
Danke, danke danke
Mfg
Marco

[vergessen]

Wenn doch die Bedienung von WinSpy nicht so elend kompliziert wäre...

Es folgt ein Beispiel für das Starten und Beenden eines Programms.

Mit einem Beispiel für ein Programm, das sich nur im Tray zeigt

Es heißt bei mir "K:\StartPortableApps.exe"

1. "Auszuspionierendes Programm" starten
2. WinSpy starten
In WinSpy:
1. Anzeigen/Fenster
2. rechts unten Haken rein bei "unsichtbare Fenster"

In der Spalte mit der Überschrift "Fenster Titel" das gesuchte Programm EINMAL anklicken/markieren.

Dann (in Winspy!) auf den Befehl "Ansicht>Objekt Inspector" (der sogar doppelt falschgeschrieben ist) klicken.

Dort sieht man dann (als "Caption/Text"), wonach FindWindow im eigenen Delphi-Programm ggfs. suchen muss...

Delphi-Quellcode:

procedure TForm1.Button3Click(Sender: TObject);
begin
  ShellExecute(0, 'open', 'k:\startportableapps.exe', nil, nil, sw_show);
end;

procedure TForm1.Button4Click(Sender: TObject);
var
  Gefunden: Hwnd;
begin
  Gefunden := Findwindow(nil, 'PortableApps.com Platform');
  if Gefunden <> 0 then
    PostMessage(Gefunden, wm_syscommand, sc_close, 0)
  else
    MessageBox(0, '"Gefunden" nicht gefunden ;-)', 'Fehler', mb_Ok or
      mb_IconExclamation or mb_DefButton1);

end;

@DeddyH post#36

Für die drei Meter zum nächsten Zigarettenautomaten lässt Du Dir sicher auch die Airforce One von Obama einfliegen, oder?

Deine Brutaloholzhammerlösung funktioniert natürlich nicht mit "StartPortableApps.exe" (< ist nämlich nur ein Starter).

LG und
vergessen

Edit hat die Delphi-Tags nachträglich von Hand dazugetextet. Von wegen Markieren und auf ein Symbol klicken...

[Sir Rufo]

Ich Klick da lieber auf den Code-Button von WinSpy, aber jeder auf seine Weise

[vergessen]

Zitat von Sir Rufo:

Ich Klick da lieber auf den Code-Button von WinSpy, aber jeder auf seine Weise

Habe ich natürlich (mehrmals, auch nach Windows-Neustarts) gemacht!

Blöderweise hängt sich WinSpy dabei bei mir auf

Selbst wenn ich WinSpy mit Administratorrechten starte...

Siehe Signatur von Bernhard Geyer bzgl. "Vista"

LG

[Sir Rufo]

Mit Win7 geht es (gut, ab und an zickt es, ist wohl weiblich )

[vergessen]

Zitat von Sir Rufo:

Mit Win7 geht es (gut, ab und an zickt es, ist wohl weiblich )

Hab' hier Vista HP mit allem D5pro-D7pe-PiPaPo und zusätzlich die Win7-Ultimate "Demo" ohne allem D5pro-D7pe-PiPaPo am Laufen.

Hast Du schon mal die Software "Nokia PC Suite" und "Nokia Ovi Suite" ausprobiert? Nein, vermutlich nicht

Unter XP und 7 funktioniert der Nokia-Kram perfekt, unter Vista überhaupt nicht

Um zurück zum Stichwort "zickt" zu kommen:

Vista ist "WESENTLICH" anspruchsvoller/lästiger als Sieben!

[Sir Rufo]

Zitat von vergessen:

Zitat von Sir Rufo:

Mit Win7 geht es (gut, ab und an zickt es, ist wohl weiblich )

Hab' hier Vista HP mit allem D5pro-D7pe-PiPaPo und zusätzlich die Win7-Ultimate "Demo" ohne allem D5pro-D7pe-PiPaPo am Laufen.

Hast Du schon mal die Software "Nokia PC Suite" und "Nokia Ovi Suite" ausprobiert? Nein, vermutlich nicht

Unter XP und 7 funktioniert der Nokia-Kram perfekt, unter Vista überhaupt nicht

Um zurück zum Stichwort "zickt" zu kommen:

Vista ist "WESENTLICH" anspruchsvoller/lästiger als Sieben!

Das Zicken bezog sich auf WinSpy und nicht auf Win 7, denn das zickt nicht.
Allerdings hat Vista bei mir auch nicht gezickt, war aber träger als Win 7

Nokia Geraffel, igitt sowas kommt mir nicht auf den Rechner.
Und ein Smartphone was die Mails, Kontakte und Termine nicht per WLan / UMTS synchronisiert kommt mir nicht in die Tasche. Heiß ich denn Kabel-Guy?

[vergessen]

Zitat:

Nokia Geraffel, igitt sowas kommt mir nicht auf den Rechner.
Und ein Smartphone was die Mails, Kontakte und Termine nicht per WLan / UMTS synchronisiert kommt mir nicht in die Tasche. Heiß ich denn Kabel-Guy?

Falls Du keinen Geldscheißer hast, ist das Nokia-Geraffel (z.B. mein 5230) durchaus eine Überlegung wert!

Es kann selbst "offline" (ohne Internetverbindung) bestens navigieren, weil sich die Karten herunterladen lassen

Mittels der "Ovi-Suite", die unter Vista aber nicht funktioniert...

Kann hier nicht 'mal ein MOD zumachen? Wir werden immer mehr Offtopic...

[mkinzler]

Für eure "nette" Off-Topic Diskussion solltet ihr euch einen anderen Ort suchen.