Zitat von
Sämy:
Hab doch noch mal eine Frage:
Wie kann ich nun ein Event auslösen, wenn dieses Property geändert wird?
Moin,
du musst dir eine Set-Methode schreiben:
procedure SetPrinterName(const Value: string);
und diese beim write der Property eintragen:
property PrinterName: string read FPrinterName write SetPrinterName;
Ebenso kann man übrigens eine Get-Methode schreiben:
function GetPrinterName: string;
Also, in die SetPrinterName schreibst du:
Delphi-Quellcode:
begin
if Value <> FPrinterName then
begin
FPrinterName := Value;
MeinEvent(...);
end;
end;