Einzelnen Beitrag anzeigen

djmsc

Registriert seit: 5. Feb 2005
11 Beiträge
 
#1

OI-Einstellung einer Komponente wird nur in Desingmodus geändert

  Alt 15. Aug 2020, 18:23
Hallo Gemeinde,

ich habe eine Komponente geschrieben (Kalender) die zwei Button enthält mit denen man die Monate vor und zurück blättern kann.
Das funktioniert soweit aber die Eigenschaften der Button die ich im OI einstellen kann werden nach dem Start des Programms nicht übernommen.
Im Designmodus ändern sich aber die Einstellungen.
Es werden also nach dem Start nur die Standartvorgaben genommen. Was mache ich falsch?

Hier mal noch der Kopf meiner Komponente
Code:
unit Kalender;

interface

uses
  SysUtils, Classes, Controls, Graphics, Messages, Windows, Dialogs, StdCtrls,
  Calc, MyButton;

type
    TKalender = class(TCustomControl)
  private
    FNextButton: TMyButton;
    FBackButton: TMyButton;
    procedure CanvasLastDays;
    procedure CanvasNextDays;
    procedure CanvasDays;
    { Private-Deklarationen }
  protected
    { Protected-Deklarationen }
  public
    constructor Create(AOwner: TComponent); override;
    destructor Destroy; override;
    procedure WMLButtonDown(var Message: TWMLButtonDown); message WM_LBUTTONDOWN;
    procedure WMLButtonUp(var Message: TWMLButtonUp); message WM_LBUTTONUP;
    procedure NextButtonClick(Sender: TObject);
    procedure BackButtonClick(Sender: TObject);
    { Public-Deklarationen }
  published
    property Enabled;
    property Font;
    property ShowHint;
    property Visible;
    property OnClick;
    property OnMouseDown;
    property OnMouseUp;
    Property NextButton: TMyButton read FNextButton;
    property BackButton: TMyButton read FBackButton;
    { Published-Deklarationen }
  end;


procedure Register;
vielleicht kann mir ja jemand helfen
  Mit Zitat antworten Zitat