Registriert seit: 31. Mär 2004
Ort: Frankfurt am Main
1.511 Beiträge
Delphi 7 Architect
|
Re: Edit bzw. ComboBox in einem StringGrid darstellen
27. Sep 2004, 14:06
Delphi-Quellcode:
///////////////////////////////////////////////////////////////////////////////
// Wenn Fokus nicht beim SG, dann blaue Zelle verbergen!
//
procedure TfoDBEdit.stringgridExit(Sender: TObject);
var grdRec:TGridRect;
begin
with grdRec do
begin
Top:=-1;
Left:=-1;
Right:=-1;
Bottom:=-1;
end;
stringgrid.Selection:=grdRec;
end;
///////////////////////////////////////////////////////////////////////////////
// Objekte im Grid unsichtbar machen,
// wenn per Scroll der Bereich ausserhalb liegt
//
procedure TfoDBEdit.stringgridTopLeftChanged(Sender: TObject);
begin
if checkbox.Visible then checkbox.Visible:=false;
end;
|
|
Zitat
|