[VisualCLX] Scrollbars im DBGrid unterdrücken

freddy437 · Beiträge: 19

Hallo zusammen,

hat jemand von euch eine Ahnung, wie man in DBGrids die Scrollbars unsichtbar macht? Die Teile werden bei mir auch dann angezeigt, wenn die Grid 7 Sätze fassen kann, aber nur 3 angezeigt werden. Ich möchte die Teile aber prinzipiell entfernen, da die Grid nie mehr als 7 Sätze enthält.

Wie könnte man diese Teile nur 2-Dimensional darstellen? Ich kann alle Objeke (Edit-Felder, Panels, die Grid selber usw.) 2-Dimensional darstellen aber diese tollen Scrollbars erscheinen immer plastisch (3Dim). :cry:

Danke schon mal im voraus.

tmc2004 · Beiträge: 140 zuviele D7,D8

Wenn du nur so wenige Daten hast kannst du sie auch manuel in ein String Grid Laden.

Gruß

tmc :roll:

_________________
it's not a bug it's a feature

tmc2004 · Beiträge: 140 zuviele D7,D8

Falls du willst hier das ganz mit code

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:

type
  TNoScrollBarDBGrid = class(TDBGrid)
  private
  protected
  procedure Paint; Override;
  public
  PUBLISHED
end;

      

implementation
    


procedure Register;
begin
   RegisterComponents('Samples',[TNoScrollBarDBGrid]);
end;

      


procedure TNoScrollBarDBGrid.Paint;
begin
   SetScrollRange(Handle, SB_Vert, 0, 0, FALSE);
   inherited;
end;

gruß
tmc

_________________
it's not a bug it's a feature

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme