Nogle form m.v.

kom med din mail så kan jeg sende det til dig

kom da i tanke om at programmet skal have en forside, så 7 forme, hvor 1 er forsiden og 6 subsider

mark.mikkelsen@mail.dk

hvad mener du med at de skal kunne arbejde sammen?

jeg skal ved hjælp af button click kunne bruge showmodel metoden, desuden skal der være 9 sider, 1 forside(hovedeform) og 8 subs

hmm ok istedet for at bruge forms ville jeg nu have brugt panels

panels ? hvad er det ?

Håber lige du smider noget afsted til min mail mail.

jeg laver det bare med forms...
og ja det kommer om 2 sec skal lige have de sidste forms med

ok

har sendt.

Men du vil måske ønske at sætte dette ind i din dpr fil inden application run:

  Form1.Position := poDesktopCenter;
  Form2.Position := poDesktopCenter;
  Form3.Position := poDesktopCenter;
  Form4.Position := poDesktopCenter;
  Form5.Position := poDesktopCenter;
  Form6.Position := poDesktopCenter;
  Form7.Position := poDesktopCenter;
  Form8.Position := poDesktopCenter;

>>dkn
Var det ikke en ide at lave

private
  Forms: array [0..7] of TMinUnderForm;

Og så oprette dem dynamisk?

hermandsen >> jo men han ved jo ikke hvad panels er...

Nej, okay... ;)

Dog er det lidt lettere at overskue med hensyn til procedure... ;)

hvilket betyder han er ny i delphi.

Så det er nok også nemmest at forstå det på den "ikke smarte måde"

Og han ønskede det sådan, så sådan blev det gjort.

JA meget. men jeg ville nok have brugt en tnotebook eller bare panels. det var jo det samme som skulle være på alle forms.

Jaja... Det er fine by me... Fortæller bare hvordan jeg ville lave det! ;)

Jeg kan ikke lige se hvordan du vil lave et seperat vindue kun ved hjælp af et panel, men det er op til dig! :)

gider du lave det om saa de aabner samme sted og ikke flyder rundt og sende den igen

Under hver fomr går du ind under Events og under OnShow skriver du så:

Left := (Screen.Width - Width) div 2;
Top := (Screen.Height - Height) div 2;

din dpr fil skal se sådan ud:

  Application.Initialize;
  Application.CreateForm(Tfrmforside, frmforside);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm4, Form4);
  Application.CreateForm(TForm5, Form5);
  Application.CreateForm(TForm6, Form6);
  Application.CreateForm(TForm3, Form3);
  Application.CreateForm(TForm7, Form7);
  Application.CreateForm(TForm8, Form8);

  Form1.Position := poDesktopCenter;
  Form2.Position := poDesktopCenter;
  Form3.Position := poDesktopCenter;
  Form4.Position := poDesktopCenter;
  Form5.Position := poDesktopCenter;
  Form6.Position := poDesktopCenter;
  Form7.Position := poDesktopCenter;
  Form8.Position := poDesktopCenter;

  Application.Run;

ja men det hjælper altså ligemeget, sender du den ikke lige i rettet udgave ?

det kan ikke passe. Har du erstatet din gamle dpr fil med den jeg sendte? når det er gjort skal du recompile dit project.

Du må have glemt noget

kompile ?

ja delphi er ikke noget script legetøj. det skal compiles og bliver så til en exe fil. det må du da have fundet ud af? det er sku ikke html...

*g* Ja det ved jeg men kan bare ikke finde compile funktionen !?

Project -> Build/compile. Og hvis du har gemt dit project et sted og du trykker på play pilen compiler den og kør filen, som bliver gemt i dit project dir.

F9

mit delphi vil ikke åbne dem, gider du ikke gøre det dkn ?

Okay ikke for at være ond eller noget men det lader til at du skal tilbage til start og have lært bare lidt grundlægende om delphi.

.dpr filer er dit project fil, det er den delphi skal åbne

ja det ved jeg, skal jeg smide et dump af at min delphi melder fejl når jeg prøver, eller vil du hjælpe ?

er du der ?

ja

hvis du vil kan du sende dit project til dkn@pc.dk

sendt

>>no_doubt
http://www.systime.dk/titel.asp?udgivelseid=2563
Kan varmt anbefales!!!