Autor Beitrag
hansg
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 168

Win XP Professional SP3, Vista Ultimate 32 SP1
Delphi 6 Professional
BeitragVerfasst: Do 27.02.03 14:42 
Hallo,
wie ich innerhalb einer Unit eine Procedure deklarieren muß und das im implementation-Teil irgendwo die Procedure hinkommt weiß ich schon nur nicht bei einer externen Unit.
Es geht um folgendes:

1. Ich hab eine Unit mit dem Namen speichern.pas

2. In dieser steht bis jetzt folgendes:
ausblenden Quelltext
1:
2:
3:
4:
5:
6:
   unit speichern; 
   Interface 
 
   implementation 

   end.


3. die Procedure an sich heißt dann savedata
ausblenden Quelltext
1:
2:
3:
4:
5:
6:
    procedure TFormSpeichern.savedata; 
    begin
    
    // irgendwelcher Quelltext

   end;


4. Wo genau muß ich diese Procedure deklarieren, im Hauptformular oder
in der Unit speichern.pas?

5. Habe ich Procedure so richtig bei implementation plaziert ?
ausblenden Quelltext
1:
   procedure TFormSpeichern.savedata;					

_________________
Gruß Hans
maximus
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 896

Win XP, Suse 8.1
Delphi 4/7/8 alles prof
BeitragVerfasst: Do 27.02.03 15:29 
Hi, In der regel sieht das so aus:
ausblenden Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
Unit speichern;

interface

procedure saveData; // deklaration

implementation

uses mainUnit; // wenn du auf daten der mainform speichern willst

procedure saveData; 
begin
  ... // daten speichern
end;


...in der mainForm dann
ausblenden Quelltext
1:
2:
3:
4:
 ...
uses speichern;
...
saveData;


Oder soll sich in der neuen unit ein formular befinden?

mfg mx
hansg
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 168

Win XP Professional SP3, Vista Ultimate 32 SP1
Delphi 6 Professional
BeitragVerfasst: Do 27.02.03 16:05 
@maximus

Genau das war die Antwort die ich gesucht habe.
Danke für die Hilfestellung

_________________
Gruß Hans