Ik kwam iets (voor mij) nogal wazig tegen:
als je een "form-unit" aan maakt verschilt de basis opbouw van de "normale"-units, dus die zonder form erbij.
dus "form-unit"
en de "normale-unit"
Ik heb dus last van de laatste soort.
Want ik wil namelijk een functie hebben die een TStringList "result", maar dat kan niet omdat de TStringList nog niet is geimported.
Ik heb oa al geprobeert om de volgorde op de "form-unit" manier te zetten, maar de compiler was het niet echt met mij eens.
Is het mogenlijk om eerst uses classes, etc; er neer te zetten en daarna de definities van de functies, zodat ik ook, ander soort types kan gebruiken?
als je een "form-unit" aan maakt verschilt de basis opbouw van de "normale"-units, dus die zonder form erbij.
dus "form-unit"
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
| unit Unit1;
interface // Defines the external view of this unit
Uses
Forms, Classes;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject); //Hier de functies/procedures, dus na de uses
end;
var
Form1: TForm1;
Implementation
{$R *.dfm} |
en de "normale-unit"
code:
1
2
3
4
5
6
7
8
9
10
11
12
| unit Unit1; interface function getLyrics(): String; function test(): TStringList; //Kan dus niet omdat de classes unit nog niet is "geused" Implementation Uses Classes; //nu pas wordt classes met TStringList geimporteerd var blaat : TStringList; //Hier nergens last van. |
Ik heb dus last van de laatste soort.
Want ik wil namelijk een functie hebben die een TStringList "result", maar dat kan niet omdat de TStringList nog niet is geimported.
Ik heb oa al geprobeert om de volgorde op de "form-unit" manier te zetten, maar de compiler was het niet echt met mij eens.
Is het mogenlijk om eerst uses classes, etc; er neer te zetten en daarna de definities van de functies, zodat ik ook, ander soort types kan gebruiken?