Hallo zusammen,

ich habe mir eine Komponente geschrieben, die in einer ComboBox alle Drucker auflistet.
Ich fülle die Komponente wie folgt:

markieren

Delphi-Quellcode:

procedure TPrinterComboBox.LoadPrinters;
var x : Integer;
begin
  Self.Items.Clear;
  Self.Items.Add( 'Standard Drucker' );
  for x := 0 to printers.printer.Printers.Count -1 do
    Self.Items.Add( printers.Printer.Printers.Strings[ x ] );
end;

Wenn ich diese Komponente verwende dann erscheinen auf meinem Rechner die korrekten Drucker.
Wenn ich aber das Programm auf meinem anderen PC installiere, dann erscheinen die gleichen Drucker
wie auf meinem PC. Was mach ich falsch?

Vielen Dank.

Eppos

Wird denn die Methode wirklich aufgerufen?
Falls das nicht der Fall ist, werden vielleicht "Standarditems" angezeigt?

PS: Self und die Unit printers musst Du nicht unbedingt explizit angeben.

Ich gehe davon das sie aufgerufen wird,
haben Sie so drin:

markieren

Delphi-Quellcode:

constructor TPrinterComboBox.Create(AOwner: TComponent);
begin
  inherited;
  fOfficeHint := TAdvHintInfo.Create;
  LoadPrinters;
end;

Sind auf dem anderen Rechner vielleicht die gleichen Drucker installiert? Wenn die Rechner in keiner Weise miteinander vernetzt sind werden dir entweder standarditems angezeigt oder du hast die Daten vielleicht in einer Textdagei gespeichert und liest diese immer nur aus.

Ich denke im Konstruktor zu suchen ist zu früh, danach werden ja noch die Stored Values geladen.
Da geb es IMHO ein Ereignis wie Loaded, mal suche ob ich es finde....

EDIT

Procedure Loaded;override;

aber ist Loaded nicht dafür da um zu signalisieren das alle Properties geladen wurden? Die Items ändern sich zwischen Constructor und dem Ende von Loaded eigentlich nur wenn sie im Objektinspektor überschrieben wurden und wenn dem so ist sollte man das akzeptieren und die explizit veränderten Items nicht zurück ändern.
Ich denke Loaded ist hier ganz klar die falsche Stelle um die Items zu setzen.