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

Вниз

создание массива для button   Найти похожие ветки 

 
Sveta   (2008-11-13 14:22) [0]

Добрый день. У меня такая задача.
Есть кнопки которые открывают определенные екзе файлы, я делаю проверку на то будет ли кнопка видна с помощью Button1.Visible := FileExists("c:/1.exe"); у меня существует ряд кнопок мне нужно сделать так что бы если допустим не было видно 2-й кнопке то 3-я кнопка встала на ее место и т.д. Сказали что можно сделать с помощью массива т.к кнопок может быть много, только вот я с делфи как три дня знакома, если кому не сложно подскажите как написать такой массив, буду благодарна


 
Ega23 ©   (2008-11-13 14:25) [1]

А не проще ли не скрывать кнопки, а создавать их по очереди?


 
Anatoly Podgoretsky ©   (2008-11-13 14:30) [2]

> Sveta  (13.11.2008 14:22:00)  [0]

Три дня знакома и уже на динамическое создание форм.
Конечно можно и просто, но побочных место тоже много.
Например надо решить вопрос, а что делать если не помещается.


 
sveta   (2008-11-13 14:36) [3]


> А не проще ли не скрывать кнопки, а создавать их по очереди?
а это как?


 
Ega23 ©   (2008-11-13 14:42) [4]

Что-то в таком духе.
if такой-то-файл-exists then
begin
 with TSpeedButton.Create(Self) do
 begin
   Parent := Панель_ТулБара;
   SetBounds(Какие надо);
   Action := Нужный_Экшн;
 end;
end;


Короче.
1. Прочитать про TAction, научиться с ними работать на примитивном уровне.
2. Научиться в динамике создавать контролы.


 
Рамиль ©   (2008-11-13 14:43) [5]


> как написать такой массив, буду благодарна

var
 ButtonArray: array of TButton;


 
sveta   (2008-11-13 14:46) [6]


> var  ButtonArray: array of TButton;
хм...это знаю



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

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

Наверх




Память: 0.47 MB
Время: 0.019 c
2-1226463290
Maks_
2008-11-12 07:14
2008.12.21
Форматирование текста в поле МЕМО


2-1226575325
Sveta
2008-11-13 14:22
2008.12.21
создание массива для button


10-1150811466
Smith
2006-06-20 17:51
2008.12.21
Как создать объект из dll?


2-1226388398
mops
2008-11-11 10:26
2008.12.21
splashscreen


8-1188408194
chipper
2007-08-29 21:23
2008.12.21
Реализация лимба виртуального прибора