Færdiggørelse af Program

Tags:    delphi

<< < 12 > >>
User
Bruger #988 @ 12.04.02 10:23
Jeg er så småt ved at være færdig med min Tekst-Editor.
Og jeg har lige nogle spørgsmål.

>Hvordan kan lave ikonet om på programmet, også ikonet i øverste venstre hjørne.

>Og hvordan laver man sådan at når man starter programmet, så kommer der først et skilt/billede Ligesom i Word, Delphi og mange andre programmer og så åbner selve programmet lidt efter.

>Hvordan laver man tekstombrydning.

Mvh.

Emil Harritz[Redigeret d. 12/04-02 10:31:18 af Emil Harritz]



16 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 5 karma
Sorter efter stemmer Sorter efter dato
ups[Redigeret d. 12/04-02 18:24:28 af Elias]


det med wordwrap er simpelt bare:
RichEdit1.WordWrap:=true;

vil du gøre sådan at den bare SKAL være der f.eks 3 sekunder skal du:

1. lave en form med en timer... i timerens ontimer event skal du så skrive
close;

2. f.eks smide det her ind under din applikations .dpr (du ved den du kan vælge hvis du trykke på den stak papir oppe i venstre hjørne:

begin
Application.Initialize;
Application.CreateForm(TMainform, mainform);
Application.CreateForm(TAbout, About);
About.showmodal;
Application.Run;
end.

Selfølgelig bare adde
form2.showmodal;
efter din create form kommandoer

til det med ikonerne skal du holde Shift+Ctrl+f11 inde og så gå ind under fane bladet Apllication og så kan du vidst godt selv resten derfra

-
skulle jo lige have mulighed for point med :D[Redigeret d. 12/04-02 20:13:31 af Elias]



Jeg er så småt ved at være færdig med min Tekst-Editor.
Og jeg har lige nogle spørgsmål.

>Hvordan kan lave ikonet om på programmet, også ikonet i øverste venstre hjørne.

>Og hvordan laver man sådan at når man starter programmet, så kommer der først et skilt/billede Ligesom i Word, Delphi og mange andre programmer og så åbner selve programmet lidt efter.

>Hvordan laver man tekstombrydning.

Mvh.

Emil Harritz[Redigeret d. 12/04-02 10:31:18 af Emil Harritz]

>Ikonet ændrer du i formens ikon-property....

>Det med skiftebilledet laver du med en form som kun viser billedet, den form unloader du så efter lidt tid, og loader mainform

>Tekstombrydningen kommer an på hvadfor en tekst komponent du benytter...



User
Bruger #988 @ 12.04.02 13:24
Jeg bruger en RichEdit.

Jeg forstår ikke helt det der med skiftebilledet kan du ikke give et eksempel.

Mvh.

Emil Harritz
[Redigeret d. 12/04-02 13:32:16 af Emil Harritz]



User
Bruger #988 @ 12.04.02 13:39
Det med tekstombrydning har jeg selv fundet ud af.

Så nu er det kun det med skiftebilledet



Det med tekstombrydning har jeg selv fundet ud af.

Så nu er det kun det med skiftebilledet


Først skal skal du lave vinduet som en AboutBox.
Så skal du gå ind i Project -> View source.
Under {$R *.RES} Skal du lave en "var",

og under den skriver du:

AbuotBox: TAboutBox;

Under Application.Initialize; skriver du:

AboutBox := TAboutBox.Create (Application);
try
AboutBox.Show;

Under Application.CreateForm(TForm1, Form1); skriver du:

AboutBox.Close;
finally
AboutBox.Free;
end;

Så sletter du Application.CreateForm(TAboutBox, AboutBox);

Emil Melgaard
emil.melgaard@private.dk



User
Bruger #988 @ 12.04.02 15:21
Det virker fint, men skiltet bliver kun vist i et splitsekond. Jeg har prøver lidt med en Timer men det virker ikke rigtig, det er sgu lidt svært med tre koder åben.

Håber du svarer igen(jeg kan ikke lige huske hvad du hedder)

Mvh.

Emil Harritz



Det virker fint, men skiltet bliver kun vist i et splitsekond. Jeg har prøver lidt med en Timer men det virker ikke rigtig, det er sgu lidt svært med tre koder åben.

Håber du svarer igen(jeg kan ikke lige huske hvad du hedder)

Mvh.

Emil Harritz


Den lukker sig selv når din form er indlæst, men hvis du gerne vil have den til at vare længere gør du følgende:

Først skal skal du lave vinduet som en AboutBox.
Så laver du en TTimer på din AboutBox som har Enabled til False.
Derefter skal du gå ind i Project -> View source.
Under {$R *.RES} Skal du lave en "var",

og under den skriver du:

AboutBox: TAboutBox;

Under Application.Initialize; skriver du:

AboutBox := TAboutBox.Create (Application);
AboutBox.Show;

Under Application.CreateForm(TForm1, Form1); skriver du:

AboutBox.Timer1.Enabled := True;

Så sletter du Application.CreateForm(TAboutBox, AboutBox);

Så går du ind i Timer1Timer og skriver:

Close;
Release;

Emil Melgaard
emil.melgaard@private.dk



ups[Redigeret d. 12/04-02 18:24:28 af Elias]



User
Bruger #988 @ 12.04.02 19:55
JEe har fået det hele til at virke pånær Det med Ikonet.
Når man kører programmet er ikonet oppe i venstre hjørne godt nok rigtigt, men det ikon der bare er på Filen når man bare ser den i Stifinder eller helt normalt er stadig Delphi ikonet.

Det bliver meget svært at uddele point når jeg har fået svar på alle mine spørgsmål, da det er nogle rigtig gode svar jeg har fået. Jeg har fire tråde åbne og hvis jeg skal give point til alle dem har jeg næsten ingen tilbage så jeg kan heller ikke overføre UPs til jer. Men jeg finder nok ud af det.

Håber i kan hjæpe mig[igen, igen, igen etc.]

Mvh.

Emil Harritz



User
Bruger #902 @ 12.04.02 20:43
JEe har fået det hele til at virke pånær Det med Ikonet.
Når man kører programmet er ikonet oppe i venstre hjørne godt nok rigtigt, men det ikon der bare er på Filen når man bare ser den i Stifinder eller helt normalt er stadig Delphi ikonet.

Det bliver meget svært at uddele point når jeg har fået svar på alle mine spørgsmål, da det er nogle rigtig gode svar jeg har fået. Jeg har fire tråde åbne og hvis jeg skal give point til alle dem har jeg næsten ingen tilbage så jeg kan heller ikke overføre UPs til jer. Men jeg finder nok ud af det.

Håber i kan hjæpe mig[igen, igen, igen etc.]

Mvh.

Emil Harritz


Det kan du ved at trykke på project også options og der er et fane blad der hedder Application og der er en knap der hedder Load icon og så skal du bare finde dit icon og så skulle det virke.



<< < 12 > >>
t