(UTC)
  1С++ users forum › 1С++ и прочие расширения v7 › Курилка › Подскажите контрол
(Группа Модераторов: 1c++ moderator)
‹ Предыдущая Тема | Следующая Тема ›
Переключение на Главную Страницу Страницы: 1 ОтправитьПечать
Обычная тема Подскажите контрол (число прочтений - 1899 )
JohnyDeath
1c++ power user
1c++ donor
Отсутствует



Сообщений: 3050
Местоположение: Волгоград
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Подскажите контрол
20. Ноября 2006 :: 09:14
Печать  
Сразу извиняюсь за ламерский вопрос, но с ActiveX почти не работаю...
Так вот какой контрол посоветуете для:
1) Отображения картинки, чтобы можно было зуумить.
2) Проигрования avi-шек и квиктаймовских файлов. Чтоб только один экран был (без всяких панелей) и внизу под эти экраном сделать кнопочку Плэй/Стоп.
Желательно чтоб всё это уже в стандартной винде было (Win2003, Office).
Ещё ращ, сорри...
  
Наверх
 
IP записан
 
steban
1c++ developer
Отсутствует


#define sizeof(x) rand()

Сообщений: 787
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Подскажите контрол
Ответ #1 - 20. Ноября 2006 :: 15:52
Печать  
Код
Выбрать все
Перем МедиаПлеер,гФорма;

Процедура ПриОткрытии()
	Попытка
		гФорма=СоздатьОбъект("СервисРасшФормы");
		гФорма.ЗагрузитьМодуль(); //ПослеОткрытия
	Исключение
	    гФорма=СоздатьОбъект("Форма");
	    гФорма.УстановитьФорму(Форма); //ФормаПриСоздании
	КонецПопытки;
КонецПроцедуры

Процедура ПослеОткрытия()
	МедиаПлеер=гФорма.СоздатьЭлементУправления("АктивИкс","ФМедиаПлеер");
	МедиаПлеер.СоздатьЭУ("MediaPlayer.MediaPlayer.1");
	МедиаПлеер.Объект.FileName="ЖесткоеНемецкоеПорно.avi";
	МедиаПлеер.Объект.Stop();
КонецПроцедуры

Процедура ФормаПриСоздании() //событие от класса Форма
	ПослеОткрытия();
КонецПроцедуры

Процедура Сформировать()
	МедиаПлеер.Объект.Play();
КонецПроцедуры	// Сформировать
  
int getRandomNumber()&&{&&  return 4; //chosen by fair dice roll&&         //guaranteed to be random&&}
Наверх
 
IP записан
 
JohnyDeath
1c++ power user
1c++ donor
Отсутствует



Сообщений: 3050
Местоположение: Волгоград
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: Подскажите контрол
Ответ #2 - 22. Ноября 2006 :: 10:54
Печать  
Спасибо! Но тут зума для картинок нет...
  
Наверх
 
IP записан
 
Переключение на Главную Страницу Страницы: 1
ОтправитьПечать
‹ Предыдущая Тема | Следующая Тема ›
 
  « Главная ‹ Раздел Вверх  



Valid RSS Valid XHTML Valid CSS Powered by Perl Source Forge