Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.12.11;
Скачать: CL | DM;

Вниз

чем еще можно рисовать   Найти похожие ветки 

 
zxc   (2005-11-13 18:18) [0]

dc:=getDC(Panel1.Handle);
polyline(dc,...,
какой 3-й аргумент?
и чем еще можно рисовать
кроме эллипсов и квадратиков


 
PAVIA ©   (2005-11-13 18:48) [1]

чем еще можно рисовать
Всем тем же, чем и в TCanvas. Только немного подругому.
какой 3-й аргумент?
Напиши windows.polyline() и высвитится подсказка. А вообще F1.


 
Zeqfreed ©   (2005-11-13 19:55) [2]

zxc   (13.11.05 18:18)

> какой 3-й аргумент?

cPoints
[in] Specifies the number of points in the array. This number must be greater than or equal to two.



>и чем еще можно рисовать
> кроме эллипсов и квадратиков

Рисовать можно только контурами (pen) и кистями (brush)


 
stef ©   (2005-11-13 20:11) [3]

Ты уже несколько дней пытаешься добится как сделать на одном и том же объекте вывод видео и рисование графики.
При выводе каждой новой картинки видео на экран, она будет перерисовывать весь экран - это очевидно.
попробуй так и все поймешь:
Помести этот обработчик по нажатию кнопки

With MediaPlayer1 do begin
    Filename := sWinDir + "\Clock.avi"; //specify video file
    DeviceType := dtAVIVideo; //set Device compatibility to AVI
    Display := form1; //Set display device to a TPanel
    Open;
    Play;
end;

(с)Это из хелпа.

А это по событию OnMouseDown для form1

form1.canvas.pen.color:=clwhite;
form1.canvas.brush.color:=clwhite;
form1.canvas.rectangle(x-4,y-4,x+4,y+4);


Переменная sWinDir хранит путь к проигрываемому файлу.
DeviceType хранит тип устройства, резервируемого для проигрывания файла.
Кстати, тут можешь поэкспериментировать.

Я также попробовал поместить над формой (где в это время проигрывается фильм) Image  и рисовать на нем - не помогло.



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

Текущий архив: 2005.12.11;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.045 c
2-1132592037
shamen1990
2005-11-21 19:53
2005.12.11
Хелпппппппп!


2-1132428043
Officeman
2005-11-19 22:20
2005.12.11
Edit1.text как запретить вводить буквы и разрешить цифры


14-1132242762
U-stack
2005-11-17 18:52
2005.12.11
Отключить Касперского


14-1132559681
RaPToRidze
2005-11-21 10:54
2005.12.11
remote desktop


2-1131985995
Dudee
2005-11-14 19:33
2005.12.11
Сохранить в файл данные разных типов





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский