Ok:
Deklaration in der
Unit, wo ich die Funktion aufrufe:
Delphi-Quellcode:
type
Students = array of TStudent;
Aufruf der Methode:
Delphi-Quellcode:
procedure TTableView.getClick(Sender: TObject);
var
StudentCount: Integer;
begin
StudentCount := DBAccess.getAllEntries(Students); //Compilerfehler kommt hier
[...]
end;
Die Deklaration der Methode:
function getAllEntries(var Output: Students): Integer;
Die Methode:
Delphi-Quellcode:
function TDBAccess.getAllEntries(Output: Students): Integer;
var
StudentCount: Integer;
begin
//StudentCount wird vorher ermittelt
[...]
//vorbereiten
setLength(Output, StudentCount+1);
for i := 1
to StudentCount
do
begin
//SQL Qeuries die das Array füllen
//z.B. Output[i].Name := SQLQuery.FieldbyName('Name').AsString;
[...]
end;
result := length(Output);
end;
Deklaration des Arrays in der
Unit, die den Datenbankzugriff durchführt:
Delphi-Quellcode:
type
Students = array of TStudent;
Wenn Du nochirgendetwas brauchst, sag Bescheid.
PS: Welche
Unit muss ich importieren, damit ich auf eine TObjectList verwenden kann?