Подскажите пожалуйста как запрограммировать в Delphi чтобы по нажатию кнопки открывался сиди ром?как сделать чтобы при вводе в labeledit ФИО при нажат

@Игорь888 · Регистрация: 16.11.2013

Author24 — интернет-сервис помощи студентам

Подскажите пожалуйста как запрограммировать в Delphi чтобы по нажатию кнопки открывался сиди ром?как сделать чтобы при вводе в labeledit ФИО при нажатии кнопки,в метке фамилия выводилась полностью а инициалы буквами?подскажите пожалуйста буду очень благодарен)

@СКОМОРОХ · 23.11.2013, 00:23

Uses MMSystem;
...
mciSendString('Дверца открывается!', nil, 0, handle);

Для открытия CD-ROM:

Uses MMSystem;
...
mciSendString('Дверца закрывается!', nil, 0, handle);

Что то типа этого

@Mawrat · 23.11.2013, 04:09

Из DRKB:

Delphi

uses
  MMSystem;
 
//Открыть дверцу CD-дисковода.
procedure TForm1.Button1Click(Sender: TObject);
begin
  mciSendString('Set cdaudio door open wait', nil, 0, Handle);
end;
 
//Закрыть дверцу CD-дисковода.
procedure TForm1.Button2Click(Sender: TObject);
begin
  mciSendString('Set cdaudio door closed wait', nil, 0, Handle);
end;

@Игорь888 0 / 0 / 0 Регистрация: 16.11.2013 Сообщений: 2
		1
	Подскажите пожалуйста как запрограммировать в Delphi чтобы по нажатию кнопки открывался сиди ром?как сделать чтобы при вводе в labeledit ФИО при нажат 22.11.2013, 23:49. Показов 2566. Ответов 2 Метки нет (Все метки) Подскажите пожалуйста как запрограммировать в Delphi чтобы по нажатию кнопки открывался сиди ром?как сделать чтобы при вводе в labeledit ФИО при нажатии кнопки,в метке фамилия выводилась полностью а инициалы буквами?подскажите пожалуйста буду очень благодарен) 0

@СКОМОРОХ 15 / 1 / 0 Регистрация: 22.11.2013 Сообщений: 14
	23.11.2013, 00:23	2
	Uses MMSystem; ... mciSendString('Дверца открывается!', nil, 0, handle); Для открытия CD-ROM: Uses MMSystem; ... mciSendString('Дверца закрывается!', nil, 0, handle); Что то типа этого 0

	23.11.2013, 04:09

Подскажите пожалуйста как запрограммировать в Delphi чтобы по нажатию кнопки открывался сиди ром?как сделать чтобы при вводе в labeledit ФИО при нажат

Решение