Avatar billede betatron Nybegynder
21. april 2002 - 14:25 Der er 1 kommentar og
1 løsning

Positions Skiftning

Jeg har det windows-baserede delphi 6.0 Personal.

Jeg har lavet et lille velkomst-hilsen program som starter op hver gang windows gør. :)

Men jeg synes det er lidt kedeligt at den altid "hopper"
op det samme sted på skærmen.
Kan man ikke skrive en kode så den hver gang programmet åbnes (helt random) finder et sted på skærmen??

Jeg ved nemlig at hver PC har et tilfældigheds-program, som man kan kalde ved at skrive "randomize"(eller så noget), kan man ikke bruge det??
Avatar billede hermandsen Juniormester
21. april 2002 - 14:36 #1
procedure TForm1.FormCreate(Sender: TObject);
begin
  Randomize;
  Top := Random(Screen.Height-Height);
  Left := Random(Screen.Height-Width);
end;
Avatar billede hermandsen Juniormester
21. april 2002 - 14:38 #2
Sorry!!!

procedure TForm1.FormCreate(Sender: TObject);
begin
  Randomize;
  Top := Random(Screen.Height-Height);
  Left := Random(Screen.Width-Width);
end;
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester