Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "KOL";
Текущий архив: 2006.02.12;
Скачать: [xml.tar.bz2];

Вниз

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

 
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 вся ветка

Форум: "KOL";
Текущий архив: 2006.02.12;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.033 c
2-1138083711
Mike48
2006-01-24 09:21
2006.02.12
Подскажите литературу......


15-1137954001
iZEN
2006-01-22 21:20
2006.02.12
Инструментарий для исследования, анализа IP-пакетов.


2-1137862988
JEK2
2006-01-21 20:03
2006.02.12
Распечатка документа с картинками


15-1137733833
begin...end
2006-01-20 08:10
2006.02.12
С Днём рождения! 20 января


15-1138145684
braynt
2006-01-25 02:34
2006.02.12
Работа с word





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский