Registriert seit: 16. Jan 2004
Ort: Bendorf
5.219 Beiträge
Delphi 10.2 Tokyo Professional
|
AW: With Test do
2. Mär 2011, 12:59
Naja du musst ja der Create-Methode auch tatsächliche Parameter übergeben also ungefähr so:
Delphi-Quellcode:
function SkinFrameButtonCreate: ISkinFrameButton;
begin
BackgoundFrame := TSkinFrameButton.Create(hMain, SK_FOLDER +
'Aero.png', '', 13, 41, XMIN_SIZE - 26, YMIN_SIZE - 55, ID_AEROBUTTON, 0);
end;
Es sei denn du baust deine Funktion eben so um:
Delphi-Quellcode:
function SkinFrameButtonCreate(hOwner: HWND; FullpathImageName: string; skLabel: PAnsiChar; x, y, xW, yH, ButID, StateMax: integer; Enabled: Boolean): ISkinFrameButton;
begin
Result := TSkinFrameButton.Create(hOwner, FullpathImageName,
skLabel, x, y, xW, yH, ButID, StateMax, Enabled);
end;
Beachte!
Du kannst dann im Hauptprogramm NUR auf Methoden der Klasse zugreifen, die auch im Interface deklariert sind. Da dein Interface keine Methoden besitzt, wirst du mit dem zurückgelieferten Interface nichts anfangen können!
Michael "Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."
|
|
Zitat
|