Thema: Delphi TLabel und Tabs

Einzelnen Beitrag anzeigen

Christian Seehase
(Co-Admin)

Registriert seit: 29. Mai 2002
Ort: Hamburg
11.105 Beiträge
 
Delphi 11 Alexandria
 
#5
  Alt 15. Feb 2003, 14:02
Moin Martin,

damit ein Edit nicht verändert werden kann muss nicht Enabled, sondern ReadOnly auf false gesetzt werden.
Wenn man dann noch im OnEnter Event ein anderes Control des Formulares als ActiveControl einträgt, kann man es nicht einmal durch anklicken aktivieren.

z.B.

Delphi-Quellcode:
procedure TfrmMAIN.Edit1Enter(Sender: TObject);
begin
  // Die Edit1 Eigenschaften können natürlich auch im OI gesetzt werden
  // So sieht's aus und verhält sich wie ein Label
  Edit1.ReadOnly := true;
  Edit1.BorderStyle := bsNone;
  Edit1.Color := clBtnFace;

  self.ActiveControl := Button1;
end;
Tschüss Chris
Die drei Feinde des Programmierers: Sonne, Frischluft und dieses unerträgliche Gebrüll der Vögel.
Der Klügere gibt solange nach bis er der Dumme ist
  Mit Zitat antworten Zitat