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

Подскажите, как создать программу!!!   Найти похожие ветки 

← →
Timskiy   (2005-08-11 01:13) [0]

Как написать маленькую программу, что бы можно было открывать и закрывать "СИДИРОМ"(вопрос тупой, просто я не смогу его нормально построить)
- я хочу сделать маленькие 2-е кнопочки на робочем столе, что бы нажав на одну "СИДИРОМ" открывался, а на другую ..., закрывался!!!
- сделать и х в маленьком окошечке и что бы их можно было перемещать (как "ВИНАМП") по рабочему столу!!!
- С "Delphi" не разу ни "РАЗГОВАРИВАЛ", так что и не знаю, поможет она или нет!!!


← →
Marser ©   (2005-08-11 01:24) [1]

Удалено модератором


← →
Tonich ©   (2005-08-11 01:27) [2]

//Для открытия
procedure TForm1.OpenBtnClick(Sender: TObject);
begin
 mciSendString("Set cdaudio door open wait", nil, 0, handle);
end;

//Для закрытия
procedure TForm1.CloseBtnClick(Sender: TObject);
begin
 mciSendString("Set cdaudio door closed wait", nil, 0, handle);
end;

один из способов

Проект Delphi World © Выпуск 2002 - 2004


← →
Marser ©   (2005-08-11 01:30) [3]


> Tonich ©   (11.08.05 1:27) [2]

Если уж говоришь А, то и B неплохо бы.
uses mmsystem


← →
Думкин ©   (2005-08-11 07:24) [4]

Удалено модератором


← →
Tonich ©   (2005-08-11 10:03) [5]


> Marser ©   (11.08.05 01:30) [3]

блин , еще когда писал думал , только бы не забыть , таки забыл


← →
Tonich ©   (2005-08-11 10:03) [6]


> Marser ©   (11.08.05 01:30) [3]

блин , еще когда писал думал , только бы не забыть , таки забыл



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

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



Память: 0.46 MB
Время: 0.024 c
3-1123501238
Aleksandr.
2005-08-08 15:40
2005.09.18
В чем проблема обращения к TPFibDataBase по указателю в Dll?


14-1124484538
Piter
2005-08-20 00:48
2005.09.18
Помогите перевести, пожалуйста


3-1123103366
Silver...
2005-08-04 01:09
2005.09.18
ADODataSet.Filter --- и поле типа Boolean


10-1102629822
turonix
2004-12-10 01:03
2005.09.18
Создание Excel файла


14-1124686374
Samozvanka
2005-08-22 08:52
2005.09.18
Помогите с расшифровкой аббревиатуры в программе 1C: Предприятие




   Наверх