Komponenten Propertys

[michael.cohrs]

Guten Morgen,

ich habe auf einem Panel 2 Memoboxen, getrennt durch einen Splitter, plaziert. Nun möchte ich über Propertys im Objektinbspektor
diese Memoboxen sichtbar oder unsichtbar schalten. Kann mir bitte hierbei jemand helfen?

Vielen Dank!!

Michael

[p80286]

.Visible ?

Gruß
K-H

[michael.cohrs]

Ja schon aber wie realisaiere ich das über eine Property?

[stifflersmom]

Wie schon gesagt, über die Eigenschaft visible.
Aber ich glaube nicht, das der Designer die Komponente dann "ausblendet", erst zur Laufzeit ist die Komponente dann unsichtbar.

[michael.cohrs]

Zur Laufzeit würde mir ausreichen, ich habe noch nicht viel mit Propertys gearbeitet und bräuchte für dieses Problem eine kurze Einweisung, wie gesagt, zur Laufzeit würde völlig ausreichen, eingestellt werde soll dieses im OI

[michael.cohrs]

Genau sowas meinte ich DeddyH, mal sehen ob ich hinbekomme. Danke!!

[DeddyH]

Was meinst Du mit Property, sowas?

Delphi-Quellcode:

type
  TFormMitMemos = class(TForm)
  private
    function GetMemosVisible: Boolean;
    procedure SetMemosVisible(const Value: Boolean);
    ...
  public
    property MemosVisible read GetMemosVisible write SetMemosVisible;
    ...
  end;

...

function TFormMitMemos.GetMemosVisible: Boolean;
begin
  Result := MemoDings.Visible and MemoBums.Visible;
end;

procedure TFormMitMemos.SetVisibe(const Value: Boolean);
begin
  MemoDings.Visible := Value;
  MemoBums.Visible := Value;
end;