TStringGrid - 1'sza kolumna ...

0

[browar]

Szybkie pytanie szybka odpowiedz :)
Z tego co "szperalem" odnosnie TStringGrid to sie nie "doszperalem" wiec jest cus takiego:

------ciach--------

PlanEksperymentu:=  TPlanEksperymentu.Create(FormaGlowna);
   PlanEksperymentu.StringGrid1.DefaultColWidth:= 40 + (DokladnoscDIG*8); // o tym mowa 
   PlanEksperymentu.Caption:='Plan Eksperymentu  - ' + OpenDialog.FileName;
   PlanEksperymentu.Info.Lines.Text:= fh;

------ciach--------
PlanEksperymentu.StringGrid1.DefaultColWidth:= 40 + (DokladnoscDIG*8) - ta deklaracja definiuje rozmiar szerokosci kolumn (DokladnoscDIG - dokladnosc czyli ilosc miejsc po przecinku, np DokladnoscDIG:=5 , -23,00000 lub oczywiscie 43,23552, do tego dochodzi jeszcze zaokraglanie w "gore" ale mniejsza z tym), pytanie - <U>jak zdefiniowac szerokosc wszystkich kolumn oprocz pierwszej ?</u> ..drugie mniej istotne..ale z czystej ciekawosci ...jest sposob na "wycentrowanie" w kolumnie danych?

pozdrowka

P.S. Czy emiikona znowu mi daje popalic a raczej Mozilla Firebird ? :-[
[cya] <--

0

<U>jak zdefiniowac szerokosc wszystkich kolumn oprocz pierwszej ?</u>

Jezeli Cie dobrze zrozumialem...

var
  I : Integer;
begin
  for I := 1 to StringGrid1.ColCount - 1 do
  begin
    StringGrid1.ColWidths[I] := 5;
  end;
end;
0

THX [browar] podwojne o duzej zawartosci piwa w piwie :)
...heh to chyba z braku kawy nie dostrzeglem wlasciwosci ColWidths..ehh

[cya]

1 użytkowników online, w tym zalogowanych: 0, gości: 1