Вниз
Скачать: CL | DM;

Подскажите пожалуйста   Найти похожие ветки 

← →
Tereshko   (2007-10-06 15:11) [0]

Добрый день !  Подскажите пожалуйста, как лучше сделать:
Создать проект, содержащий 3 кнопки со следующими функциями:
1-я кнопка (учесть реальные ограничения, связанные с размером формы) раздвигает форму на 5 пикселей во все стороны;
2-я кнопка (1-сама по себе, 2 - с Shift, 3 - c Ctrl) переключает цвет формы по кругу (из 5-и) 1 – в одну сторону, 2 – в др., 3 – включает белый цвет;
3-я кнопка перебирает тип курсора (по кругу из 5-ти);


← →
Denis_ ©   (2007-10-06 15:13) [1]

А какие есть варианты?


← →
Tereshko   (2007-10-06 15:24) [2]

Ничего в голову не приходит


← →
Virgo_Style ©   (2007-10-06 15:35) [3]

Tereshko   (06.10.07 15:11)
раздвигает форму на 5 пикселей во все стороны


Это значит, надо увеличить ширину и высоту на 10, и сместить на 5 вверх и влево. По-английски это width, height, top, left. Все четыре - свойства формы.


> 2-я кнопка (1-сама по себе, 2 - с Shift, 3 - c Ctrl)
> переключает цвет формы

По-английски Color. Также является свойством формы.


> 3-я кнопка перебирает тип курсора

Соответственно Cursor, насколько я помню.

Вопросы-то будут?


← →
Tereshko   (2007-10-06 15:49) [4]

а как на одну кнопку несколько процедур сделать


← →
Tereshko   (2007-10-06 15:54) [5]

ну чтобы кликнул один цвет, еще раз кликнул - другой


← →
DVM ©   (2007-10-06 16:53) [6]

Храни количество кликов в глобальной переменной. При клике увеличивай значение этой переменной и соответственно если зачение больше определенного (количество цветов) то обять возвращай ее значение к 0.
После изменения значения с пом case ... of по этому значению выбирай цвет.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c
2-1191492500
031178
2007-10-04 14:08
2007.10.28
Как подцепить базу ACCESS в DELPHI.


11-1174814107
Dmitriy___
2007-03-25 13:15
2007.10.28
Applet и USE_NAMES


15-1190873947
F@T@L_Err0r
2007-09-27 10:19
2007.10.28
Ctrl+Alt+Del


4-1177402203
Malik
2007-04-24 12:10
2007.10.28
ChekedBox


2-1191743251
мфтнф_й
2007-10-07 11:47
2007.10.28
TCustomListBox -- OnDblClick




   Наверх