Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#3

Re: Kreuztabelle und Visualisierung

  Alt 12. Mai 2006, 13:53
Du könntest ein TStringGrid verwenden mit FixedRows=1, FixedCols=1.
1.) zählen, wieviele Fehlercodes es gibt. diese werden waagerecht abgetragen
Cols = AnzahlFehlercodes+1
2.) die Fehlercode werden in einer TStringList gespeichert, um bei 4.) die richtige Spalte zu finden
3.) Für jedes Bauteil wird nun eine neue Zeile hinzugefügt
Schleife über
SELECT * FROM Bauteile 4.) Schleife über
SELECT * FROM BauteilFehlercodes WHERE IdBauteil=:aktuellesBauteil und die passenden Zellen mit einem '*' füllen

Da die '*' optisch nicht so ansprechend sind, könntest du das Event
OnDrawCell benützten um statt des '*' ein hübsches Icon zu zeichnen.
Andreas
  Mit Zitat antworten Zitat