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

Вниз

создание массива для 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.044 c
15-1223975914
newbie
2008-10-14 13:18
2008.12.21
Как научится писать программы без ошибок


6-1196865973
Sunshine
2007-12-05 17:46
2008.12.21
Indy киберплат и шифрование.


15-1224036802
Slider007
2008-10-15 06:13
2008.12.21
С днем рождения ! 15 октября 2008 среда


15-1224694104
TStas
2008-10-22 20:48
2008.12.21
Чем сделать из Audio CD MP3?


2-1226510112
art
2008-11-12 20:15
2008.12.21
Помогите переделать задачу из Pascal в Delphi





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