[Delphi] Efektowny program

[myslaf]

Witam !
Jak można osiągnąć w Delphi taki efekt ?

I czy macie jakieś tutoriale/poradniki jak zrobićefektowny keygenerator ?

 

[kanar123]

Prosty sposób... ustawiasz sobie obramowanie formy na bsNone ...
reszta to image, buttony, pola edit i combobox.. napisz na PW jeśli chcesz pomocy

 

[myslaf]

A jak zrobić. Jeśli wybiorę z listy Serial 1 to pokazuje w Name: cos i w Serial: 12341234. Jeśli wybiore Serial 2 to w Name cos ...

wojasek

 

[maly3900]

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
if Combobox1.Text = 'xs' then begin showmessage('wybrano xs'); end;
if Combobox1.Text = 'xx' then begin showmessage('wybrano xx'); end;
end;

http://hms.ovh.org/art1.php

 

[beXorn]

a jak zrobić zeby dalo sie go przesuwac?

 

[djmentos]

Żeby co się dało przesuwać?

Chociaż w sumie wszystko jest tak samo. W OnMouseMove w zależności od GetCursorPos zmieniasz sobie właściwość Left i Top.

Ewentualnie jak chodzi ci o formę:
http://forum.ks-ekspert.pl/topic/126850-delphi-przesuwanie-formy/

 

[D.F.]

Muzykę w formacie XM możesz odgrywać przy użyciu bardzo małej i prostej biblioteki uFMOD

.

Kształt okna można zrobić niestandardowy funkcją SetWindowRgn

.

Przesuwanie okna to się robi obsługując komunikat WM_LBUTTONDOWN

(w Delphi będzie to zdarzenie OnMouseDown formularza) w następujący sposób:

  ReleaseCapture();
  SendMessage(Form1.Handle, WM_NCLBUTTONDOWN, HTCAPTION,0);

Możesz dodać jeszcze różne efekty, np. jakaś prosta animacja na Windows GDI

.

Proponuję pisać to w WinAPI, a nie na komponentach.