slå ctrl+esc og winkey fra!

Prøv med SystemParametersInfo(SPI_SCREENSAVERRUNNING, INTEGER(TRUE), @i, 0)
Og fjern i:=0;

Når du skal slå dem til igen, skal du skrive INTEGER(FALSE)

takker... men!

Hvis du også kan hjælpe med det her så får du dobbelt point:

Jeg har en form, som fylder hele skærmen ud. Den har en ingen border, altså blå bælke i toppen osv.

Den skal altid være forest, StayOnTop. Nu vil jeg gerne kunne create andre forme som bliver lagt oven på? (det lyder åndsvagt, men det virker underligt hvis jeg beder den om at create en form jeg kalder frmMail)

Kan du ikke bare sætte Formstyle? F.eks. sådan her Form1.FormStyle := fsStayOnTop;

easysoft>> Hvis du er ved at lave et desktop, så kan du jo ændre i en win-reg (Står formentlig til Explorer.exe) - Her skal du så sætte din egen fil ind... Men så skal det også bare virke... Ellers kan du jo nok godt få problemer med dit Windows :o)

Dette eksempel er hentet fra min hjemmeside:
(www.electronicbugs.org)

type TForm1 = class(TForm)

procedure Button1Click(Sender: TObject);

private

public
Enabled1: Integer;

end;

var
Form1: TForm1;
CloseVariable: Boolean;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
var
Dummy : integer;
begin
Dummy := 0;
if Enabled1 = 1 then
Enabled1 := 0 //0 means enable ctl-alt-delete
else
Enabled1 := 1; //1 means disable controls
//Disable ALT-TAB
SystemParametersInfo( SPI_SETFASTTASKSWITCH, Enabled1, @Dummy, 0);
//Disable CTRL-ALT-DEL
SystemParametersInfo( SPI_SCREENSAVERRUNNING, Enabled1, @Dummy, 0);
end;


Håber du kan bruge det...

ZeroHero

makse>> jeg udbyber lige:

jeg har lavet en form (main) som har bredde og højde på størrelse med Screen (Width & Height).
Nu vil jeg lave en ny form (dummy) som har main som Parent, altså at den forbliver inde for main\'s område!

Jeg har sat dummy til at være en available form (project > options).
Den creater jeg så på følgende måde:

  with Tdummy.Create(main) do begin
    Parent := main;
    Visible := True;
  end;

men! Title linje på dummy er hele tiden grå! (inaktiv).

Hva\' hel**** er der galt?

jeg havde faktisk selv svaret, men fordi at I gad at give nogle bud, så kan I deles om pointene... :-)