Delphi-PRAXiS

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/)
-   -   Delphi zeilenumbruch im Stringgrid rückgängig!?! (https://www.delphipraxis.net/25133-zeilenumbruch-im-stringgrid-rueckgaengig.html)

heiopei 1. Jul 2004 17:47


zeilenumbruch im Stringgrid rückgängig!?!
 
nachmittach,
ich habe folgenden quellcode:

Code:
//sg1.ondrawcell...
var
  rtemp: TRect;
  temp: string;
begin
  temp := sg1.cells[acol, arow];
  if temp <> '' then
  begin
  rtemp := rect;
   drawtext(sg1.canvas.handle, pchar(temp), length(temp), rtemp, dt_calcrect or dt_wordbreak or    
       dtleft);
  if (rtemp.bottom - rtemp.top) > sg1.rowheights[arow] then
    sg1.rowheights[arow] := rtemp.bottom - rtemp.top;
  rtemp.right := rect.right;
  sg1.canvas.fillrect(rtemp);
  drawtext(sg1.canvas.handle, pchar(temp), length(temp), rect,dt_wordbreak or dtleft);
  end;
end;
ps: der code ist aus delhpi 6 kochbuch

jetzt möchte ich aber, das wenn der text kleiner wird, der zeileumbruch rückgängig, d.h. die zeile mit dem text wieder verkleinert wird!

wie mach ich das?

servas,
heiopei

heiopei 2. Jul 2004 17:37

Re: zeilenumbruch im Stringgrid rückgängig!?!
 
hallo,
hat keiner einen rat?

mfg,
heiopei

ibp 2. Jul 2004 17:57

Re: zeilenumbruch im Stringgrid rückgängig!?!
 
...nimm dir ein onchange.. ereignis und überprüfe ob der text in die spalte passt, (mit canvas und rect sollte das gehen), dann kannst du ja entscheiden ob der text umgebrochen werden soll oder nicht

gruß rené


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

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