Forum: Programmieren allgemein
by BadenPower,
19. Mai 2015
Bei der Verwendung von Math.Max müssen wesentlich mehr Arbeitschritte durchlaufen werden, als mit der Variante mit der einfachen If-Abfrage
Wir benötigen lMaxRowHeight:
Das erbibt die zwei Möglichkeiten:
1. mit Math.Max():
lMaxRowHeight := Math.Max(lTextHeigth,lMaxRowHeight);
Forum: Programmieren allgemein
by BadenPower,
12. Mai 2015
Ich hatte gehofft, dass von Dejan Vu eine Code-Variante mit seinen Vorstellungen kommt, aber leider ist dies wie immer nicht so.
Dennoch möchte ich seine Fragen (obwohl ich nicht annehmen kann, dass sie ernst gemeint waren) noch beantworten.
Diese Frage ist ganz einfach zu beantworten:
Wenn ich mit Math.Max arbeiten würde, dann würde ich in diesem Fall nur unnötig Resourcen...
Forum: Programmieren allgemein
by BadenPower,
9. Mai 2015
Die Antwort hierauf verbirgt sich schon im Post über Deinem.
Falls Du es nicht gelesen hast:
Das Du das nicht verstanden hast, liegt daran, dass Du die Code-Schnipsel des TE nicht gelesen hast.
Hättest Du den Thread aufmerksam durchgelesen, so wie es sich gehört, dann wäre Dir aufgefallen, dass diese Zeilen eine reine Übernahme einer Funktion des TE sind.
Forum: Programmieren allgemein
by BadenPower,
26. Apr 2015
Das ist ja logisch, dass das "blinken" muss, denn Du ermittest in der DrawCell-Methode immer nur die Höhe der aktuellen Zelle.
Danach setzt Du in UpdateRowHeights die Property RowHeight auf den ermittelten Wert der aktuellen Zelle, was wiederum ein Neuzeichnen aller Zellen der Zeile hervorruft.
Du musst bevor Du RowHeight einen Wert zuweist, erst ermitten, welche Zelle der ganzen Zeile den...
Forum: Programmieren allgemein
by BadenPower,
13. Dez 2014
Hallo zusammen,
ich dachte eigentlich bisher, dass die Variabeln selbsterklärend sind, wenn man sich den Sourcecode durchschaut.
"liZ1" und "liZ2" sind reine Zählervariabeln für die Schleifen.
"liTextWidth" ist der gerade ermittelte Wert der Länge des Textes der Zelle
In "liMaxWidth" wird der größte Wert von "liTextWidth" einer Spalte gespeichert
Forum: Programmieren allgemein
by BadenPower,
8. Dez 2014
Hallo zusammen,
für die Breite habe ich das so gemacht:
procedure HGGridColWidth(AGrid: TStringGrid; AMinWidth: Integer);
var
liZ1: Integer;
liZ2: Integer;
liWidth: Integer;