TFont
jeg henter en funktion ind i unit3 via unit4://===== unit 3 =========
procedure TForm3.Button1Click(Sender: TObject);
var
font : TFont;
begin
font := unit4.getfont;
end;
//======================
//===== unit 4 =========
function getfont:TFont;
begin
//result.create;
result.Name := 'Arial';
end;
//======================
Hvorfor virker det ikke? jeg får en fejl - noget med "Access Vialotion..."?? Jeg har prøvet med result.create men det virker heller ikke?