Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi x-y-Datenbank in DBChart o.ä. bringen ? (https://www.delphipraxis.net/110878-x-y-datenbank-dbchart-o-ae-bringen.html)

Andy386 26. Mär 2008 09:00

Datenbank: Paradox • Version: 7 • Zugriff über: lokal

x-y-Datenbank in DBChart o.ä. bringen ?
 
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 ?

Andy386 26. Mär 2008 14:02

Re: x-y-Datenbank in DBChart o.ä. bringen ?
 
ok, hab jetzt eienen Weg ohne DB gefunden. Mit TChart:

Delphi-Quellcode:
 Chart1.Series[0].AddXY(x,y,'',farbwert(a[x,y]));
(die erste serie hat die nummer 0)

'tcolor farbwert(double)' berechnet aus dem Wert der Matrix einen RBG-Wert


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:58 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz