Avatar billede kolme Nybegynder
16. november 2003 - 15:08 Der er 7 kommentarer og
1 løsning

Flere Forms åbner ved eksekvering!

Hej,

Jeg har et lille program, som har den fejl at når jeg eksekverer programmet åbnes både hovedformen, men også en anden form, som jeg ikke vil have til at åbne sig ved programmets opstart - Jeg har ikke selv sat den til det, den gør det bare! Hvad kan jeg gøre? Er der andre der har prøvet det?
Avatar billede bramsing Nybegynder
16. november 2003 - 15:31 #1
Er du sikker på du ikke har en form2.Show; i procedure TForm1.FormShow(Sender: TObject) ??
Avatar billede bramsing Nybegynder
16. november 2003 - 15:46 #2
eller en form2.Visible := TRUE i samme procedure ??
Avatar billede kolme Nybegynder
16. november 2003 - 18:58 #3
Ja, det skulle jeg da absolut mene - De eneste procedurer jeg er er to buttonclick procedurer. Disse er rigtig nok sat til at åbne andre forme, men det har jo ikke noget at sige.
Min unit ser slåedes ud:

unit UStart1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TFMenu = class(TForm)
    LOverskrift: TLabel;
    LBRegMangel: TListBox;
    Memo1: TMemo;
    Label2: TLabel;
    BVisBrugere: TButton;
    BVisGrupper: TButton;
    BTerminate: TButton;
    Label1: TLabel;
    procedure BVisGrupperClick(Sender: TObject);
    procedure BVisBrugereClick(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  FMenu: TFMenu;

implementation

uses UMedarbejdere1, UGrupper1;

{$R *.dfm}

procedure TFMenu.BVisGrupperClick(Sender: TObject);
begin
FGrupper.Show;
end;

procedure TFMenu.BVisBrugereClick(Sender: TObject);
begin
FMedarbejdere.show;
end;

end.
Avatar billede stoney Nybegynder
16. november 2003 - 21:07 #4
Prøv at checke UMedarbejdere1, UGrupper1

Stoney
Avatar billede kolme Nybegynder
16. november 2003 - 21:31 #5
Hvad med dem? De skal vel være der, eftersom at formen skal bruge dem på et tidspunkt.
Avatar billede bramsing Nybegynder
17. november 2003 - 10:19 #6
Kom til at tænke på om du er kommet til at "peje" din UStart1 OnShow til en af dine Click events ??? blot en mulighed...

//'bramsing'
Avatar billede f2f4 Novice
17. november 2003 - 10:58 #7
Prøv at tjekke din projekt fil *.dpr

Slet alt vedr. form2 (medmindre du ved det er ok), pånær i 'uses' sætningen (der må form2 godt stå)! Slet ex. linien Application.CreateForm(TfForm2, fForm2); hvis den eksistere!

Alternativt på i 'Søg', 'Find i filer...', vælg 'filer i projektet' og søg efter den form der vises (form2). Så kan du hurtigt se om den er refereret nogle steder som du ikke regnede med.
Avatar billede kolme Nybegynder
29. marts 2004 - 10:33 #8
Måtte slette og starte forfra - Jeg fandt aldrig ud af hvad fejlen var. Jeg gennemgik alle jeres svar uden held.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

IT-JOB