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

Вниз

Помогите оптимизировать   Найти похожие ветки 

 
КросавЧЕГ   (2008-07-15 07:14) [0]

Есть код который присваивает Caption-ам всех компонентов на форме определенный текст. Если судить по коду то здесь перебираются все свойства компонентов и если присутствует свойство Caption то присваивается текст. Только не пойму почему после присвоения я ставлю Break, что бы он дальше не перебирал свойства и перешел к следующему компоненту, то код перестает работать. Как можно оптимизировать этот код ?

for i := 0 to ComponentCount -1 do
 begin
   if IsPublishedProp(Components[i],"Caption") then
     SetPropValue(Components[i], "Caption", "Строка Строка Строка");
 end;


 
brother ©   (2008-07-15 07:16) [1]

> почему после присвоения я ставлю Break,

потому, что это выход из for ;)
> что бы он дальше не перебирал свойства и перешел к следующему
> компоненту

О_о


 
КросавЧЕГ   (2008-07-15 07:19) [2]

Врубился )))) Тему Close =)


 
brother ©   (2008-07-15 07:23) [3]

тему не надо было open)
достаточно на break нажать f1 ;)


 
No_Dead ©   (2008-07-15 07:47) [4]

/*
филиал баша?
0_о
*/


 
brother ©   (2008-07-15 08:39) [5]

> О_о

визуальное отображение эмоций )


 
Правильный$Вася   (2008-07-15 10:12) [6]


> SetPropValue(Components[i], "Caption", "Строка Строка Строка");

зачем так сложно?


 
oldman ©   (2008-07-15 10:14) [7]


> Есть код который присваивает Caption-ам всех компонентов
> на форме определенный текст.


убил бы


 
brother ©   (2008-07-15 10:25) [8]

> убил бы

да пусть присваивает)



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

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

Наверх




Память: 0.46 MB
Время: 0.004 c
2-1217413081
Alexey
2008-07-30 14:18
2008.09.07
Переименование файла


2-1217239959
AlekseyB
2008-07-28 14:12
2008.09.07
База данных MS SQL


11-1193140621
Yury Sidorov
2007-10-23 15:57
2008.09.07
Релиз KOL-CE


15-1216091674
КросавЧЕГ
2008-07-15 07:14
2008.09.07
Помогите оптимизировать


15-1216157591
Германн
2008-07-16 01:33
2008.09.07
WinXP, NTFS и имена файлов





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский