|
|
Другие темы раздела | |
Delphi Заполнение сетки изображений DrawGrid символами выбранной таблицы символов Цель работы: изучение отдельных свойств и методов DrawGrid с целью заполнения ячеек сетки изображений символами. Указания: Использовать компоненты TComboBox, TDrawGrid. Задание: Предусмотреть заполнение сетки DrawGrid символами выбранного шрифта из списка ComboBox1 HELP!! https://www.cyberforum.ru/ delphi-beginners/ thread685496.html |
Табулирование функции на заданном отрезке Delphi Задание звучит так: Табулирование функции y=sin(lnx)-cos(lnx)+2lnx на отрезке с шагом 0,2 Сделала так procedure TForm1.Button1Click(Sender: TObject); var a,b,h,x,y: real; begin a:=strtofloat(edit1.text); b:=strtofloat(edit2.text); h:=strtofloat(edit3.text); memo1.clear; |
Delphi Изменение видимости компонентов при SetFocus компонента Edit Доброго времени суток, помогите найти ошибку в программном коде procedure TForm22.edt13KeyPress(Sender: TObject; var Key: Char); begin if edt13.SetFocus then//здесь ошибка begin edt5.Visible:=False; edt6.Visible:=False; edt7.Visible:=False; edt8.Visible:=False; https://www.cyberforum.ru/ delphi-beginners/ thread685448.html |
Delphi Уменьшить размер ехе-шника (Delphi XE)
https://www.cyberforum.ru/ delphi-beginners/ thread685385.html Написал программу, скомпилил в Delphi 7 - 500КБ. Скомпилил такой же код в Delphi XE - 1,5МБ. Мягко говоря, неприятно удивляет такое увеличение объема ехешника в XE версии. Скажите, как можно его уменьшить? Переход в режим Release не предлагать - уже сделал (кстати, абсолютно не помогло :(). Если нужно, могу выложить исходник программы |
Delphi Моделирование деления растительной клетки Помогите, пожалуйста, как создать программу, которая будет моделировать деление растительной клетки? :cry: Очень нужно! Заранее спасибо! :) вот интерфейс примерный: |
Delphi Найти и вывести на экран самую короткую группу нулей и единиц Здравствуйте, помогите решить задачу: дана строка, состоящая из групп нулей и единиц. Найти и вывести на экран самую короткую группу. Выводить в label. Спасибо. Добавлено через 23 часа 46 минут Это такая сложная задача, что ее никто не может решить? https://www.cyberforum.ru/ delphi-beginners/ thread685298.html |
Delphi Как узнать перечень коротких имен системных папок все перегуглил не нашел коротких имен системных папок :( ну вот типа "%Docume~1%\..." вот те самые которые пишут в % где можно увидеть полный перечень? Добавлено через 10 минут кое что по папкам все таки нарыл сам, еще вопрос касательно команды DeleteFile вот к примеру: DeleteFile("%USERPROFILE%Рабочий стол\Новая папка\*.*"); выдает кучу ошибок, что не так? https://www.cyberforum.ru/ delphi-beginners/ thread685252.html |
Delphi Найти наибольший отрицательный и наименьший элемент Ребят помогите пожалуйста вот такая вот задачка "Найти наибольший отрицательный и наименьший элемент" не могу найти наименьший элемент( i, j, m, buf: Integer; begin j:=0; For i:=0 to 10 do begin If a < 0 then begin j:= j +1; Memo1.Lines.Add(IntToStr(a)); end; end; |
Delphi Найти первый и второй отрицательный элемент Народ помогите пожалуйста у меня вот такая проблема программа ищет первый элемент но как найти второй не могу догадаться( помогите с решением задачи !!! procedure TForm1.Button2Click(Sender: TObject); var m:integer; i1:integer; i2:integer; begin i1:=0; i2:=0; //первый отрицательный https://www.cyberforum.ru/ delphi-beginners/ thread685112.html | Delphi ShellListView Добрый день,столкнулся с такой проблемой,как в sShellListView отобразить несколько форматов например: .exe и .lnk ? https://www.cyberforum.ru/ delphi-beginners/ thread685106.html |
Delphi В каждое слово строки вставить введённую пользователем букву после символа с заданным номером Доброго дня всем! В универе задали написать программу, которая после нажатия на кнопку в каждое слово строки вставляет введённую пользователем букву после символа с номером, указанным пользователем. Вот мой текст программы: procedure TForm1.Button1Click(Sender: TObject); var wb: boolean; s,b:string; i,k,n,m,j,p:integer; a:array of string; begin s:=Edit1.Text; b:=Edit2.Text; ... |
Delphi В одномерном массиве все положительные четные элементы заменить пятеркой Помогите пожалуйста решить задачу в делфи. вот условие:В одномерном массиве А состоящем из 12 целых чисел все положительные четные элементы заменить пятеркой. https://www.cyberforum.ru/ delphi-beginners/ thread685080.html |
249 / 154 / 31
Регистрация: 07.10.2012
Сообщений: 401
|
|
31.10.2012, 20:37 | 0 |
Програмно нажать Кнопку (Button) - Delphi - Ответ 363642331.10.2012, 20:37. Показов 14119. Ответов 9
Метки (Все метки)
Ответ
Вызвать процедуру, назначенную кнопке на событие OnClick.
Вернуться к обсуждению: Програмно нажать Кнопку (Button) Delphi
0
|
31.10.2012, 20:37 | |
Готовые ответы и решения:
9
Как програмно нажать на кнопку? Как програмно запустить (нажать) кнопку Програмно нажать клавишу Програмно заблокировать кнопку Win |
31.10.2012, 20:37 | |
31.10.2012, 20:37 | |
Помогаю со студенческими работами здесь
0
Нажать кнопку в webrowser Программно нажать кнопку Нажать на кнопку в webbrowser Нажать кнопку в другой программе |