Entwickler-Ecke

Sonstiges (Delphi) - Schwarzer Bildschirm


HouseGemacht - Fr 12.11.10 09:04
Titel: Schwarzer Bildschirm
Hallo,
ich habe mal (ausversehen) ein Programm namens Blackscreen geöffnet. Und das Programm sorgte dafür das der Desktop Komplett Schwar wurde. Wie kann ich soetwas Programieren?

Danke im vorraus,
HouseGemacht


bummi - Fr 12.11.10 09:06

Ganz billig?
Setz bei Deinem Huuptformular boderstyle auf bsNone,
WindowState auf wsMaximized und Color auf clBlack


HouseGemacht - Fr 12.11.10 09:09

Edit:

Ah Ok, Und wi kann ich sagen:"Immer im Vordergrund"?


bummi - Fr 12.11.10 09:20

Taskbar geht noch ...

STRG+ALT+DEL hats Du bis XP noch mit einem Keyboardhook wegbekommen, aber hierbei möchte ich nicht helfen...


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
procedure HideTaskbar;
begin
  ShowWindow(FindWindow('Shell_TrayWnd'nil), SW_HIDE);
end;

procedure ShowTaskbar;
begin
  ShowWindow(FindWindow('Shell_TrayWnd'nil), SW_Show);
end;


HouseGemacht - Fr 12.11.10 09:35

Ich will ja auf niemande Schaden. Aber könntest du mir den Shoutdown befehl für Delphi nennen?


jaenicke - Fr 12.11.10 10:55

user profile iconHouseGemacht hat folgendes geschrieben Zum zitierten Posting springen:
Aber könntest du mir den Shoutdown befehl für Delphi nennen?
Wohin willst du rufen? :gruebel:
Meinst du Alt + F4 (shutdown für Delphi)?

Was hat das mit dem Thema zu tun?


Dude566 - Fr 12.11.10 11:05

Scheint so als wollte jemand ein mieses Scherzprogramm schreiben. :roll:


HouseGemacht - Fr 12.11.10 11:23

Er hats erfasst, aber ich habe es fertig! wenn ich weiß wie man hochläd tue ich das mal!


Dude566 - Fr 12.11.10 11:55

Ich denke nicht, dass ein Scherzprogramm ein positiver Beitrag ist.


Gausi - Fr 12.11.10 12:06

Ich mach hier mal zu. Die eigentliche Frage ist schon beantwortet, und Scherzprogramme dieser Art werden hier nicht unterstützt. Schwarzer Bildschirm mag noch OK bzw. witzig sein, runterfahren des Rechners nicht mehr.