Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Trackergeeignete Tabellenkomponente (https://www.delphipraxis.net/167875-trackergeeignete-tabellenkomponente.html)

Magic94 24. Apr 2012 15:16

AW: Trackergeeignete Tabellenkomponente
 
Liste der Anhänge anzeigen (Anzahl: 1)
hab jetzt schon was mit dem StringGrid gebastelt ;-)
sieht recht vernünftig aus find ich:
(bisher tuts nur wirklich "Play".. der Rest ist noch mitten in der Mache und sollte nicht viel bringen ausser ein paar Fehler)

Magic94 24. Apr 2012 22:22

AW: Trackergeeignete Tabellenkomponente
 
Liste der Anhänge anzeigen (Anzahl: 1)
Habe ein weiteres Problem bei der DrawCell Methode. Der Text wird unsichtbar beim "markieren" / blau drübermalen.
http://tenac.webhop.net/images/stringgrids.jpg

Medium 24. Apr 2012 23:13

AW: Trackergeeignete Tabellenkomponente
 
Du musst den Text selbst nochmals neu zeichnen nachdem dein FillRect()/Rect() unterwegs war, da das das natürlich übermalt hat. Die On*Draw*-Events treten i.A. nach* Zeichnen durch den Default-Handler (bzw. "Drawer") auf - d.h. du bist der letzte der malt bevor es auf den Bildschirm geht.

*) Manche Grids unterlassen den Standard-Handler ganz, ob das TStringGrid das auch tut weiss ich grad nicht.

himitsu 25. Apr 2012 00:09

AW: Trackergeeignete Tabellenkomponente
 
Zitat:

Zitat von Medium (Beitrag 1163427)
*) Manche Grids unterlassen den Standard-Handler ganz, ob das TStringGrid das auch tut weiss ich grad nicht.

es gibt 2-3 Vorgehensweisen

- die Standardausgabe kommt vor dem OnDrawEvent und man würde alles übermalen
- es gibt entweder die Standardausgabe oder das OnDrawEvent
- die Standardausgabe kommt nach dem Event (und läßt sich teilweise/ganz abschalten) ... hier kann man z.B. die BrushColor oder PenColor ändern (da diese vor dem Event gesetzt wurden) und der Standardhandler würde dann mit den geänderten Farben arbeiten

Der TCustomGrid/TDrawGrid/TStringGrid arbeitet so:
1: Font setzen (wenn DefaultDrawing=True)
2: Hintergrund zeichnen (wenn DefaultDrawing=True)
3: Text zeichnen (im TStringGrid und wenn DefaultDrawing=True)
4: OnDrawCell
5: FocusRect zeichnen (wenn DefaultDrawing=True)

Magic94 28. Apr 2012 00:34

AW: Trackergeeignete Tabellenkomponente
 
Zitat:

Zitat von Medium (Beitrag 1163427)
Du musst den Text selbst nochmals neu zeichnen nachdem dein FillRect()/Rect() unterwegs war, da das das natürlich übermalt hat. Die On*Draw*-Events treten i.A. nach* Zeichnen durch den Default-Handler (bzw. "Drawer") auf - d.h. du bist der letzte der malt bevor es auf den Bildschirm geht.

*) Manche Grids unterlassen den Standard-Handler ganz, ob das TStringGrid das auch tut weiss ich grad nicht.

Das habe ich auch verstanden das es übermalt wird^^, mich interessiert viel eher WIE ich das neu zeichne, da ich sowas noch nie gemacht habe.

himitsu 28. Apr 2012 01:49

AW: Trackergeeignete Tabellenkomponente
 
Delphi-Referenz durchsuchenTCanvas.TextOut ?

Und vergiß nicht den State auszuwerten, denn darin siehst du, was du noch zeichnen mußt, wie z.B. die blaue Selection und Dergleichen.

Magic94 28. Apr 2012 03:17

AW: Trackergeeignete Tabellenkomponente
 
Zitat:

Zitat von himitsu (Beitrag 1163963)
Delphi-Referenz durchsuchenTCanvas.TextOut ?

Und vergiß nicht den State auszuwerten, denn darin siehst du, was du noch zeichnen mußt, wie z.B. die blaue Selection und Dergleichen.

nee das ist total ekelig, das muss auch einfacher gehen. Da ist man ja ewig nur die Koordinaten am ausrechnen. Ausserdem bekomm ich schon bei einer Zahl die ich aktualisiere ein elendes Flackerkonzert. Es müssen aber 32 gleichzeitig (bzw in direkter Abfolge) neu gezeichnet werden

himitsu 28. Apr 2012 12:11

AW: Trackergeeignete Tabellenkomponente
 
All zu viel ausrechnen muß man nicht, denn das übernimmt Delphi für einen.
Über den Parameter Rect bekommt man die Position der Zelle sehr praktisch geliefert.

Und nein, TextOut, TextRect und Co. ist der korrekte Weg ... Delphi mach intern auch nichts Anderes, als mit Delphi-Referenz durchsuchenTCanvas.TextRect den Text dort reinzuschreiben.

Falls das doppelte Zeichnen stört, dann kann man es mit Delphi-Referenz durchsuchenDoubleBuffered versuchen
oder man schaltet das Zeichnen vom Delphi ab (Delphi-Referenz durchsuchenTCustomGrid.TDefaultDrawing=False), aber dabei muß man dann natürlich alle Zellen selber zeichnen.


Und z.B. über Hier im Forum suchenStringGrid1DrawCell TextOut lassen sich einige Beispiele finden.

Magic94 28. Apr 2012 12:45

AW: Trackergeeignete Tabellenkomponente
 
danke danke danke :)

Das mit Doublebuffered hab ich schon probiert, da ich aber das XPMan in dem Programm verwende zeichnen sich ekelige ränder um Buttons, oder verschwinden einfach ganz. Das geht also schonmal nicht :(

EDIT 1: DefaultDrawing auf False, Rect benutzt und schon klappt alles wie gewünscht :)
EDIT 2: Naja nicht ganz.
Zitat:

Pattern.Canvas.TextOut(Rect.Left+1,Rect.Top,Patter n.Cells[1,trackerpos]);
macht jetzt folgendes:
http://tenac.webhop.net/images/problem.jpg

himitsu 28. Apr 2012 12:50

AW: Trackergeeignete Tabellenkomponente
 
DoubleBuffered hat halt einige Probleme, vorallem bei transparenten Komponenten.
Das Prinzip hinter DoubleBuffered ist ein OffScreenBitmap, in welches die Komponente gezeichnet und was dann auf einmal auf dem Bildschirm ausgegeben wird.
Und da die Bitmaps standardmäßig erstmal einen schwarzen Hintergund haben, wird dann alles Transparentes natürlich auch schwart, da dieses Bitmap keine Transparenz kennt.
Außerdem kann es bremsend wirken und bei RDP-Verbindungen ist sowas auch eher hinderlich.

Man kann das DoubleBuffered aber auch nur für eine bestimmte Komponente aktivieren und nicht unbedingt gleich für die ganze Form.
Es heißt ja eigentlich Delphi-Referenz durchsuchenTWinControl.DoubleBuffered und nicht TForm.DoubleBuffered. :wink:


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:47 Uhr.
Seite 2 von 2     12   

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