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

Вниз

Указатели и DirectDraw   Найти похожие ветки 

 
webpauk   (2005-06-03 15:04) [0]

есть:

TSomeObj = class;
private
  fP: Pointer;
  fSurf: IDirectDrawSurface7;
public
  procedure Show;
end;

var
  fTemp: IDirectDrawSurface7;
  fSomeObj: TSomeObj;
begin
  // создается поверхность fTemp
  fSomeObj.fP:=@fTemp;
end;

// вопрос:
procedure TsomeObj.Show;
begin
// как отрисовывать поверхность, используя указатель
  fSurf.bltfast(0, 0, ???, @fRect, DDBLTFAST_DONOTWAIT);
end;


 
webpauk   (2005-06-03 15:06) [1]

Дополнение:
fSomeObj:=TsomeObj.create;


 
webpauk   (2005-06-03 15:15) [2]

правильно вопрос звучит так:
как привести типы?
fSurf.bltfast(0, 0, IDirectDrawSurface7(fP), @fRect, DDBLTFAST_DONOTWAIT); - выдает ошибку


 
Digitman ©   (2005-06-03 15:20) [3]

IDirectDrawSurface7(IUnknown(fP))

или

IUnknown(fP) as IDirectDrawSurface7


 
webpauk   (2005-06-03 15:22) [4]


> Digitman ©

Спасибо


 
Digitman ©   (2005-06-03 15:29) [5]


> правильно вопрос звучит так


правильно он д.б. прозвучать так : как привести произвольный указательный тип к произвольному интерфейсному типу)


 
Digitman ©   (2005-06-03 15:30) [6]

а Остапа понесло - DirectDraw, да TSomeObj, да еще черт-те что и сбоку бантик)


 
webpauk   (2005-06-03 15:34) [7]


> Digitman ©  

ну понесло! дык проект сложный, без объектов  - запутаешься в процедурах


 
webpauk   (2005-06-03 17:05) [8]


> Digitman ©  

поспешил я с бля-годарностью! Прога вываливается.


 
webpauk   (2005-06-03 17:14) [9]

IDirectDrawSurface7(IUnknown(fP^)) - !!!!



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

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

Наверх




Память: 0.45 MB
Время: 0.039 c
14-1120484396
Sergey_Masloff
2005-07-04 17:39
2005.07.31
Опрос. У Вас дома есть книги? Ну хотя-бы колобок и курочка ряба?


1-1121087371
webpauk
2005-07-11 17:09
2005.07.31
Удаление компонента изнутри


1-1121022378
Dadhi
2005-07-10 23:06
2005.07.31
Аналог Mem в Делфи


6-1111846159
Алексей
2005-03-26 17:09
2005.07.31
подключиться к FTP-серверу?


14-1120677507
Piter
2005-07-06 23:18
2005.07.31
Сколько стоит билет до Алушты?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский