Hallo,
ich bin totaler noob in Delphi.
Ich möchte eine 2D-Wertetabelle (also, x-y-Wert) irgendwie in Delphi graphisch ausgeben.
Nach ein bischen Suchen bin ich auf die idee gekommen, es über die Datenbankkomponenten zu machen... also entweder TDBChart oder TDBImage
Die
Paradox-
DB steht, hat folgende Form:
Nr (+); X (N); Y (N); Value (N)
Die Anbindung in Delphi über TTable & TDataSource habe ich schon hinbekommen.
Neue Einträge (gemacht über .Next und .Insert, s.u.) in der Datenbank werden über ein DBGrid angezeigt.
Ich hab es nur leider nicht hinbekommen, irgendwie mein Wert in Abhängigkeit von X & Y darzustellen...
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var x,y:Integer;
verzeichnis:string;
begin
randomize;
Table1.Active:=false;
verzeichnis:=ExtractFilePath(ParamStr(0));
Table1.DatabaseName:=verzeichnis;
Table1.TableType:=ttParadox;
Table1.Active:=true;
Table1.First;
for x:=1 to 10 do for y:=1 to 10 do
begin
Table1.Next;
Table1.Insert;
Table1['X']:=x;
Table1['Y']:=y;
Table1['Value']:=random;
update;
end;
end;
'spoiler' geht nicht, oder mach ich was falsch ?