dynamiczna forma...

0

Witam !
Tworze forme dynamicznie i chcial bym zrobic aby dla kazdej formy tworzyla sie osoba zakladka na pasku zadan a nie wszytskie w jednej jak to jest obecnie. jesli ktos wie jak to zrobic to prosze o pomoc z gory dzieki !!!!!!

0

Dodaj do do formy taką deklarację:

type
TForm2 = class(TForm)
{...}
protected
procedure CreateParams(var Params: TCreateParams); override;
end;

A potem uzupełnij procedurę tak:

procedure TForm2.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
Params.WndParent := GetDesktopWindow;
end;

0

Wielkie dzieki ale mam problemy z wstawieniem tego:
protected
procedure CreateParams(var Params: TCreateParams); override;
end;
ni ebardzo wiem gdzie to wstawic....pozdrówka

0

ni ebardzo wiem gdzie to wstawic....pozdrówka

Bez takiej wiedzy zaczynasz programować??

b

Jestem od krytyki. Budowa modułu to jest wstęp do wprowadzenia do podstaw programowania w Pascalu.

0

Vogel jestes od krytyki czy od pomocy ???to ze tego akurat nie wiem to moja sprawa, jestem początkujący i chyba mam prawo czegos nie wiedziec ???

0

Wielkie dzieki ale mam problemy z wstawieniem tego:
protected
procedure CreateParams(var Params: TCreateParams); override;
end;
ni ebardzo wiem gdzie to wstawic....pozdrówka

Jak masz coś takiego:

type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;

to wstaw to np. po public, tzn tak:

type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
protected
procedure CreateParams(var Params: TCreateParams); override;
end;

P.S. Zgadzam się, że można czegoś nie wiedzieć, każdy kiedyś zaczyna, albo nie robi nic, czego nie pochwalam, ale może rzeczywiście takie rzeczy możnaby wiedzieć, zanim się za dynamiczne formy bierzesz ;p

0

Vogelowi chodziło o to, żebys najpierw nauczył się podstaw czyli przeczytał jakiś kurs.

http://vogel.iglu.cz

Masz prawo nie widziec i masz prawo sie nie dowiedzieć.

1 użytkowników online, w tym zalogowanych: 0, gości: 1