Forum: Programmieren allgemein
by Luckner,
19. Mai 2015
Hallo BadenPower,
bin gerade aus dem Urlaub zurück (dieses JvStringGrid1 hat mich fertig gemacht) und wollte mich für den Beispiel bedanken. Hat mich richtig weiter gebracht. Habe zwar nur ein Teil davon verstanden, aber es funktioniert mit einigen Anpassungen. Ich muss mir dringend ein Tutorial für dieses Stringgrid suchen, weil mir die Arbeitsweise dieser Komponente überhaupt nicht verstädlich...
Forum: Programmieren allgemein
by Luckner,
4. Mai 2015
Hallo BadenPower,
sitze mal wieder an dem Stringrid und versuche Deinen Hinweis umzusetzen. Mit dem Ergebnis,dass diese Grid irgendt etwas macht, jedoch nicht das was ich will. Könntest Du mir bitte weiter helfe? Meine Spalte, die sich in der Höhe ändert ist die 3-te. In jeder Zeile der 3-ten Spalte steht ein Text, der verschieden lang sein kann.
Luckner
Habe mal zwischendurch mit dem...
Forum: Programmieren allgemein
by Luckner,
26. Apr 2015
Hallo Jumpy,
das funktioniert nicht. Grid ist immer 1-Zeilig und blinkt ständig.:roll:
Forum: Programmieren allgemein
by Luckner,
23. Apr 2015
Hallo DeddyH,
1 sg habe ich geändert.
Jetzt meine Änderung in der Routine, die irgendwie ein blinkendes Grid nach sich zieht.
procedure TFrameAuftrag.UpdateRowHeight(GridPositionen: TStringGrid; const iRow, iHeight: Integer);
begin
with GridPositionen do
if iHeight > RowHeights then
RowHeights := iHeight
else if iHeight < RowHeights then
Forum: Programmieren allgemein
by Luckner,
23. Apr 2015
Hallo, habe mir zu diesem Thema 3 folgende Routinen gestrickt (irgendwo im Internet gefunden und angepasst)
procedure TFrameAuftrag.GridPositionenDrawCell(Sender: TObject; ACol,
ARow: Integer; Rect: TRect; State: TGridDrawState);
var s: String;
begin
if Sender = nil then
Exit;
if not (Sender is TJvStringGrid) then
Exit;
Forum: Programmieren allgemein
by Luckner,
13. Dez 2014
Hallo BadenPower,
mache mich gerade ran, Deine Routine für mich anzupassen, Brauche bitte noch einige Hinweise:
Was ist
AMinWidth: Integer
liZ1: Integer; (kann ich mir denken)
liZ2: Integer; (kann ich mir denken)
liWidth: Integer;
liTextWidth: Integer; (kann ich mir denken)
liMaxWidth: Integer;
Forum: Programmieren allgemein
by Luckner,
8. Dez 2014
Hallo BadenPower,
Dein Beispiel ist ein guter Ansatz. Werde es entsprechend modifizieren. Danke.
Luckner.
Forum: Programmieren allgemein
by Luckner,
8. Dez 2014
Ja, dass habe ich mir schon gedacht, dass man Das von Hand programmieren muss. Also alle Zellen durchgehen, die höchste Zelle aussuchen und entsprechen die Zellhöhe, für alle setzen.
Danke.
Forum: Programmieren allgemein
by Luckner,
8. Dez 2014
Hallo,
habe in einem Stringgrid die Option goRowSizing auf True gesetzt. Damit, so glaube ich und es funktioniert, die Zeilenhöhe automatisch an den Text der Zelle angepasst. Die Zeile wird jedoch nicht automatisch kleiner, falls der Text in dieser Zelle kleiner wird. Gibt es eine Funktion, mit der ich diese Zellgrössen-Anpassung auslösen kann?
Danke, Luckner.