Ich würde aus dem Record eine Klasse machen!
Delphi-Quellcode:
TDocxline = class(Tobject)
public
level : integer;
article_id : integer;
article_number : string;
article_name : string;
procedure LoadFromDataset(Dataset:TDataset);
procedure SaveToDataset(Dataset:TDataset);
end;
Du siehst, es gibt schon 2 Methoden, die eindeutig der Klasse zuzuordnen ist.
Und es lassen sich bestimmt noch weitere Methoden finden.
Record + Funktionen, die mit dem Record arbeiten ==> Klasse.