Nowa forma :)

0

Moj program ma funkcje NewWindow, w ktorej tworzy Form1. Czy da sie tak zrobic, zeby kazda nowo utworzona forma byla widoczna na pasku zadan?? [???]

0

WebBrowser [glowa]

procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
  Params.Style := Params.Style or WS_SYSMENU or WS_MINIMIZEBOX;
end;
0
procedure TForm1.CreateParams(var Params: TCreateParams);
begin
  inherited;
  Params.ExStyle := Params.ExStyle or WS_EX_APPWINDOW;
  Params.Style := Params.Style or WS_SYSMENU or WS_MINIMIZEBOX;
end;

Nie dziala... :(

Zapomnialem dodac ze to Form1 tworzy inne formy [stuk]

Mam jeszcze jedno pytanie. Jak wywolac ta procedurę?? Pisze:

var Params: TCreate Params

[???]

0
  private
    { Private declarations }
  protected
    procedure CreateParams(var Params: TCreateParams); override;
0

Oki, ale jest jeszcze cos. Gdy zaladuje strone do okna, nie zmienia sie

Application.Title

ani Form1.Caption

 Czemu?? Tylko w glownym oknie sie zmienia (na ostatnio załadowaną stronę).  [???] 
0

Raczej Self.Caption := 'cos';

0

Wielkie ThX Wolverine !! Jak bedziesz w Elblagu, to Ci stawiam piwo [browar] :)

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