Hallo,
danke für die Info.
Habe es gleich getestet.
Meine Frage.
Wie weise ich dem Stringgrid die Eigenschaften zu ?
Hier der Versuch:
-----------------
unit Unit3;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.Grids, Vcl.StdCtrls;
type
TForm3 = class(TForm)
StringGrid1: TStringGrid;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form3: TForm3;
implementation
{$R *.dfm}
procedure TForm3.Button1Click(Sender: TObject);
type
TXEigenschaften = Record // Speichert die Eigenschaften einer Zelle
Farbe : TColor; // Schrift
end;
var EigenschaftenGrid : array [0..5,0..5] of TXEigenschaften;
begin
EigenschaftenGrid[2,2].Farbe:=clred;
form3.StringGrid1.Cells[2,2]:='-';
stringgrid1.Repaint;
end;
end.