Avatar billede dalbjerg Nybegynder
16. august 2002 - 18:40 Der er 5 kommentarer og
1 løsning

Ved afslut

Kan man lave noget som opfange, nå en bruger trykker på krydset oppe i toppen ?

Er mega meget ny inden for delphi, så må gerne skæres ud i pap.

jeg vil lave sådan at nå programmeret lukkes gemmes et memo indhold i en txt fil.
Avatar billede armena Nybegynder
16. august 2002 - 18:44 #1
i form1's property events dobbel klikker du på close og indsætter koden
Avatar billede soreno Praktikant
16. august 2002 - 18:45 #2
dobbelt klik på OnDestroy eventet til din form og gør det, du vil gøre når dit program afsluttes.
Avatar billede armena Nybegynder
16. august 2002 - 18:46 #3
altså:
1.tryk på events i din object inspector(for form1)
2.dobbel klik på OnClose Query
3.Så skulle der komme et kode vindue frem..
4.og der sætter du koden ind
Avatar billede dalbjerg Nybegynder
16. august 2002 - 18:57 #4
Memo1.Lines.SaveToFile("note.txt");

for at gemme til en fil, skal man så ikke bare skrive dette ?
Avatar billede armena Nybegynder
16. august 2002 - 19:10 #5
1.tryk på events i din object inspector(for form1)
2.dobbel klik på OnClose Query
3.Så skulle der komme et kode vindue frem..
4.og der sætter du koden ind
5. :
 
var CanClose: Boolean);
begin
  IF Rettet THEN BEGIN
    CASE MessageDlg('Skal dit dokument gemmes,'+#13#10+
                    'inden teskt lukkes?',
                    mtConfirmation,mbYesNoCancel,0) OF
    idYes:    Gem1Click(Sender);
    idNo:    ;
    idCancel: CanClose:=False;
    end;
  end;

Det var det!
Avatar billede yousif Nybegynder
16. august 2002 - 22:20 #6
Gem1Click(Sender);??
CanClose := False;??

1. Gem1Click?? hvad gør den?
2. CanClose := False;?? hvorfor sætter du variblen til false når den ikke bruges?
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

JP/Politikens Hus

Digital Workplace Supporter

Forsvarsministeriets Materiel- og Indkøbsstyrelse

Kryptokustode til opbygning af Forsvarets nye IT-platform

Riskpoint A/S (Riskpoint Solutions Limited)

IT Business Analyst

Riskpoint A/S (Riskpoint Solutions Limited)

Senior Developer