Tak det virker fint.
Men - jeg var lidt for hurtigt ude. Mit program skal lige checke størrelsen på et bibliotek først - og det er faktisk denne størrelse, der bestemmer om, der skal arbejdes videre med Form2 eller Form3.
Undersøgelsen af biblioteket sker i Form1 og er uden brugerindflydelse overhovedet. Dernæst skal brugeren arbejde videre med Form2 eller Form3 - alt afhængig af størrelsen af det bibliotek, der blev checket i Form1.
Hvis jeg under Form1.FormCreate laver checket for størrelsen - og fx til sidst i Form1.FormCreate skriver:
Form1.Hide;
Form2.Show;
....får Form2 ikke focus.
Tilsvarende, hvis der skal skiftes til Form3. I begge tilfælde beholder Form1 focus.
Nogen bud på, hvordan jeg giver fx Form2 focus og sikrer, at Form1 ikke vises?
Mvh
Sven
"Niels" <nmartin@ispam.com> skrev i en meddelelse news:3ae34532.20131347@news.12move.dk...
> Just as I expected, Sven Storm came up with this:
>
> > Hvis StartParameter<100 kan der kun arbejdes med Form1
> > Hvis StartParameter>=3D100 kan der kun arbejdes med Form2
>
> Her er en meget simpel project-fil. Den tjekker ikke for fejl, så hvis
> man giver alt andet end et heltal som den første parameter så får man
> fejl.
>
> program Test;
>
> uses
> Forms,
> Unit1 in 'Unit1.pas' { Form1 },
> Unit2 in 'Unit2.pas' { Form2 };
>
> var
> StartParameter: integer;
> begin
> Application.Initialize;
> Application.Title := 'Test program';
> StartParameter := IntToStr(ParamStr(1));
> if StartParameter < 100 then
> Application.CreateForm(TForm1, Form1)
> else
> Application.CreateForm(TForm2, Form2);
> Application.Run;
> end.
>
> Håber det hjælper.
>
> Niels
> --
> e-mail: nmartin at iname dot com
> ICQ UIN: 50187323
>
http://www.niller.f2s.com/ - niLLer's pages