20. september 2001 - 19:44
Der er
7 kommentarer og 3 løsninger
Nye vinduer..?
Jeg sidder og kører rundt i det med at åbne nye vinduer i Delphi.. jeg har et program, hvor man ved tryk på en knap, skal kunne åbne et ekstra vindue, hvor brugeren kan indtaste nogle personlige oplysninger, trykke på en knap, hvorefter oplysningerne gemmes, og vinduet lukker... Hvordan gøres dette nemmest?
Annonceindlæg fra Infor
20. september 2001 - 19:56
#1
hmm procedure buttom1click(Sender: TOBject); begin memo1.lines.add(edit1.text); memo1.lines.add(edit2.text); memo1.lines.add(edit3.text); memo1.lines.add(edit4.text); memo1.lines.add(edit5.text); memo1.lines.add(edit6.text); memo1.lines.savetofile(\'oplysninger.txt\'); memo1.clear; end;
20. september 2001 - 19:57
#2
og så selvf. close
20. september 2001 - 20:02
#3
Jamen - hvor åbner man det ekstra vindue?
20. september 2001 - 20:05
#4
Er der evt en guide på nettet der fortæller det?
20. september 2001 - 20:11
#5
du kan gøre det at du opretter en ny unit og så når man trykker på knappen gøres dette: Form2.Show; og den nye unit vil blive vist. på den nye unit laver du et edit felt og en knap og så når der trykkes på den knap sker dette: Form1.Feltetpåform1.edit := editfeltetpåform2.edit; form2.close; sig til hvis du ikke forstod det... /ZIRON
20. september 2001 - 22:43
#6
Du kan altid oprette et vindue (form) fra Delphi, og dette åbnes med syntaxen: navnpåformen.show; Du skal altså ikke oprette en ny UNIT, men derimod en ny FORM. En FORM er det samme som et VINDUE. Hvis du f.eks. opretter en form med navnet \"form2\", så åbnes denne form med syntaxen: form2.show; Hvis du også har problemer med hvordan du gemmer i en fil så hjælper jeg gerne med det..
20. september 2001 - 22:50
#7
Takker - det gjorde det hele lidt lettere :) Hvis jeg nu bare skal have en simpel gemme-procedure.. Jeg har et edit-feldt og når jeg trykker på en knap gemmes det hele i en tekst-fil... :)
20. september 2001 - 22:58
#8
hvis det skal være let så: indsætter du en memo som du visibel := False og s¨å på koden for knappen: memo1.lines := edit1.text; memo1.lines.savetofile(\'c:\\hej.txt\'); /ZIRON
20. september 2001 - 23:01
#9
Takker :)
20. september 2001 - 23:02
#10
det var så lidt :-) /ZIRON
Kurser inden for grundlæggende programmering