Einzelnen Beitrag anzeigen

Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.323 Beiträge
 
Delphi XE2 Professional
 
#4

Re: Stringgrid mit Fettschrift?

  Alt 26. Okt 2006, 10:41
Hallo,

ich hab das auch mal gebraucht und hab mir diese procedure geschrieben (ok - sie ist sehr speziell auf mein Projekt - aber man kann damit was anfangen):

Delphi-Quellcode:
procedure TMainForm.StringGrid_aufbauen;
var
  i: Integer;

begin
  with StringGrid_Ablauf do
    begin
      //Schriftgröße und -Farbe
      Font.Color := clBlack;
      Font.Height := 12;
      Font.Style := [fsBold];

      //Aufbau der Spalten 0, 1, 10
      Cells[0, 0] := '';
      Cells[1, 0] := 'Zeitpunkt';
      Cells[10, 0] := 'Kommentar';

      ColWidths[0] := 50;
      ColWidths[1] := 100;
      ColWidths[10] := 250;

      //Aufbau der Spalten 2 - 9
      for i := 1 to 8 do
        begin
          Cells[i + 1, 0] := IntToStr(i);
          ColWidths[i + 1] := 25;
        end;

      //Aufbau der 1. Zeile
      Cells[0, 1] := '1';
    end;
end;
Das hab ich im OnCreate der Form drin. Wie du siehst, schreib ich den Font des StringGrids um.
Nachteil davon: Egal was du als Text übergibst - dieser wird immer fett, schwarz und mit der Größe 12 angezeigt.
mfg
Helmi

>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<
  Mit Zitat antworten Zitat