2 events under samme event.. (TForm1.FormCreate)

Forresten, måske lyder det en smule forvirrende, så:
Begge events kræver en kode under TForm1.FormCreate
så der skal ske 2 ting når TForm1.FormCreate....


M.v.h. ProDoc

Jeg ved ikke helt hvad du mener med koder, men du kan fylde lige så meget du har lyst til ind.
ex.
procedure TForm1.FormCreate(Sender: TObject);
begin
        showmessage(\'hej\');
        showmessage(\'med\');
        showmessage(\'dig\');
end;

men det er måske ikke det du mener.

A_C

procedure TForm1.FormCreate(Sender: TObject);
begin
        form1.WindowState:= wsMaximized;
        showmessage(\'Noget mere\');
end;

Hvis du mener at du har nogle procedurere eller functioner, som skal køres under FormCreate tilføjes de blot:

fx:

procedure TForm1.FormCreate(Sender: TObject);
begin
  WindowState := wsMaximized;
  {do something here!}
end;

Det er ikke helt det jeg mener jeg vil have disse 2 koder til at virke men hvordan:

procedure TForm3.FormCreate(Sender: TObject);
begin
  WindowState := wsMaximized
  end;

begin
  keypreview := true;
  ind_kode := \'\';
  panel1.visible := false;
end;

(Man kan ikke gøre sådan her men hvordan gør man så???

M.v.h. ProDoc

Ømm, tak begge 2 men a_c\'s svar var d jeg havde brug for:)

MEN TAK!!

M.v.h. ProDoc