Составить текст из нескольких Label'ов - Помощь студентам - Страница 2

Serge_Bliznykov · 29.11.2011, 13:13

Код:

не могу выложить... пишет "ошибка загрузки"

предварительно запакуйте исходники в архив (rar или zip)
архив и выкладывайте.

qwerty55 · 29.11.2011, 13:19

я знаю... я так и сделал...

Аватар · 29.11.2011, 14:16

Код:

  for i:=0 to Panel1.ControlCount-1 do
    if (Panel1.Controls[i] is TLabel) and
       (TLabel(Panel1.Controls[i]).Top>Bevel1.Top) and
       (TLabel(Panel1.Controls[i]).Top+TLabel(Panel1.Controls[i]).Height<Bevel2.Top) then begin
      Inc(xCount);
      SetLength(xLabels,xCount);
      xLabels[xCount-1]:=TLabel(Panel1.Controls[i]);
    end;

qwerty55 · 29.11.2011, 18:22

Аватар, БОЛЬШОЕ СПАСИБО!!! во я дурак... надо было через "and" добавить еще условия, а я свои строки лепил куда попало и не работало

29.11.2011, 13:13	#11
Serge_Bliznykov Старожил Регистрация: 09.01.2008 Сообщений: 26,229	Код: `не могу выложить... пишет "ошибка загрузки"` предварительно запакуйте исходники в архив (rar или zip) архив и выкладывайте.

29.11.2011, 14:16	#13
Аватар Старожил Регистрация: 17.11.2010 Сообщений: 18,922	Код: `for i:=0 to Panel1.ControlCount-1 do if (Panel1.Controls[i] is TLabel) and (TLabel(Panel1.Controls[i]).Top>Bevel1.Top) and (TLabel(Panel1.Controls[i]).Top+TLabel(Panel1.Controls[i]).Height<Bevel2.Top) then begin Inc(xCount); SetLength(xLabels,xCount); xLabels[xCount-1]:=TLabel(Panel1.Controls[i]); end;` Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
текст из нескольких ячеек в одну	Tirendus	Microsoft Office Excel	10	20.01.2016 16:45
Сохранить в текстовый файл текст из Memo и текст из нескольких Edit	misher	Общие вопросы Delphi	5	02.01.2011 15:37
Текст из нескольких txt файлов	Federal	Помощь студентам	6	28.12.2010 18:34
несколько Label'ов в качестве кнопок	skalt12	Общие вопросы Delphi	12	12.08.2010 13:18
Не могу составить запрос на выборку из нескольких таблиц :(	Semidarckness	SQL, базы данных	3	23.05.2010 15:27

29.11.2011, 13:19	#12
qwerty55 Пользователь Регистрация: 22.02.2010 Сообщений: 60	я знаю... я так и сделал...

29.11.2011, 18:22	#14
qwerty55 Пользователь Регистрация: 22.02.2010 Сообщений: 60	Аватар, БОЛЬШОЕ СПАСИБО!!! во я дурак... надо было через "and" добавить еще условия, а я свои строки лепил куда попало и не работало