Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - [VisualCLX] Scrollbars im DBGrid unterdrücken


freddy437 - Do 19.02.04 12:07
Titel: Scrollbars im DBGrid unterdrücken
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 - Fr 05.03.04 15:07

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

Gruß

tmc :roll:


tmc2004 - Di 09.03.04 01:33

Falls du willst hier das ganz mit code



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, 00, FALSE);
   inherited;
end;


gruß
tmc