Ana formdan bağımsız form oluşturma [ÇÖZÜLDÜ]

[hi_selamlar]

S.A arkdaşlar.

sorunum şu;

ana form ve diğer formlarım var. bunların sadece ana formu açılışta crate edip diğer formları ise
kendim gerektikçe create ediyorum.

bir formum olsun bu tuşa basında ana formdan bağımsız olarak çalışsın. yani ana form simge durumuna geçtiğinde
diğer formum küçülmesin (minimize olmasın.) ve alt taskbarda ana formum ve diğer formumda görünsün. kullanıcı isterse
taskbardan kendisi geçsin. bunun için nasıl bir yöntem izlemem gerekli.

şöyle bir kod buldum fakat çalışmadı.

Kod: Tümünü seç

procedure TForm3.CreateParams(VAR Params: TCreateParams);
begin
  Inherited CreateParams(Params);
  Params.WndParent := GetDesktopWindow;
end;

acaba ana form da veya bağımsız formda yapmam gereken başka bir şeyler varmı ?

S.A.

[akdatilla]

merhaba
yazdığın kod aynen o istediğini yapıyor. Yalnız bişey unutmuş olabilirsin. Tanımlama kısmına override eklemen gerekli.

Kod: Tümünü seç

tform3=Class(TForm)
...
procedure CreateParams(VAR Params: TCreateParams);override;
...


procedure TForm3.CreateParams(VAR Params: TCreateParams);
begin
  Inherited CreateParams(Params);
  Params.WndParent := GetDesktopWindow;
end;

[hi_selamlar]

S.A.

Hocam teşekkür ederim.
Haklısının

Kod: Tümünü seç

Override;

eklemeyi unutmuşum.

teşekkürler

S.A.