Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.02.12;
Скачать: CL | DM;

Вниз

Работа со статусной строкой   Найти похожие ветки 

 
konst ©   (2005-06-13 11:31) [0]

подскажите, плиз, как правильно в KOL работать со статусной строкой формы?

можно ли разбивать на ячейки, наподобие как в VCL:
Form.StatusText[1]:="Статус для первой ячейки";
Form.StatusText[2]:="Статус для второй ячейки";
и тд ?


 
Thaddy   (2005-06-13 11:40) [1]

Form.StatusText[0]:="This";
   Form.StatusText[1]:="is";
   Form.StatusText[2]:="an";
   Form.StatusText[3]:="example";


 
konst ©   (2005-06-13 11:48) [2]

точно также ? а зачем же тогда свойство Status.SimpleText ?

Спасибо.


 
ECM ©   (2005-06-13 12:40) [3]

Form.SimpleStatusText := "bla-bla-bla";
что эквивалентно:
Form.StatusText[255]  := "bla-bla-bla";

при этом статусная строка начинает отображаться как простой текст - все что было записано (если было) в Form.StatusText[i] -не отображается...
Подробнее см. MSDN описание Windows Controls:Status Bars (SB_SIMPLE)


 
konst ©   (2005-06-15 11:18) [4]

Спасибо, однако есть непонятная для меня закавыка.
Как свойство StatusText, рАвно как и SimpleStatusText принимают значение типа PChar, а не обычный String.

То есть, например для вывода в статусную строку числа необходимо проводить аж два преобразования: Int2Str() и затем StrPCopy(), верно ?


 
ECM ©   (2005-06-15 11:38) [5]

2konst [4]
Лучше так:
 
 Form.StatusText[0] := PChar(Int2Str(...));

или так (если ты не используешь ShortString глобально):

var
 S: String;
...
 S := Int2Str(...);
 Form.StatusText[0] := @S[1];


 
konst ©   (2005-06-15 12:29) [6]

2ECM[5]:

Спасибо огромное! всё по полочкам разложили.
тему считаю исчерпанной.



Страницы: 1 вся ветка

Текущий архив: 2006.02.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.068 c
15-1137610275
Ксардас
2006-01-18 21:51
2006.02.12
Подскажите прогу...


2-1138054140
DenXi
2006-01-24 01:09
2006.02.12
TService и че с ним делать


2-1138219426
veb
2006-01-25 23:03
2006.02.12
Прервать цикл


5-1124352966
Stanislav
2005-08-18 12:16
2006.02.12
В Наследнике TScrollBox периписать процедуру скроллинга


3-1134659444
mpokemonov
2005-12-15 18:10
2006.02.12
Большие буквы в запросе