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

Вниз

Прорисовка в DelphiX   Найти похожие ветки 

 
Nostradamus ©   (2002-10-08 18:47) [0]

Доброго времени суток, мастера,
Вот пишу свою первую игру с использованием DelphiX.
Есть у меня несколько процедур которые рисую определённые части интерфейса. Иногда когда я вызываю их поочерёдно и в конце пишу DXDraw.Flip и оно рисует только то что выводит последняя процедура. Что интересно если сразу же выполнить тот же код (последовательность процелр и Flip) всё прорисовывается нормально. Не пойму почему.

P.S. Надеюсь я не слишком запутанно сформулировал вопрос.


 
Ibrik   (2002-10-11 13:17) [1]

Выложи сюда куок кода


 
Nostradamus ©   (2002-10-11 15:54) [2]

Оказывается кстати это происходит только в Fullscreen. В окне всё нормально прорисовывает...


...
PaintMenu;
PaintGameInfo;
PaintCurCard;
RepaintBoard;
DXDraw.Flip;
...
procedure TGame.PaintMenu;
begin
...
ImageList.Items[1 + I].StretchDraw(fOwnSurface.Surface, fMenuRectAr[I], 0);
...
end;

procedure TGame.PaintCurCard;
begin
...
Canvas.Font.Color := clRed;
Canvas.TextOut(CurCardRect.Left + 10, CurCardRect.Top + 10, fPlayers[fCurPlayer].Name);
...
B := TBitmap.Create;
B.Width := 144;
B.Height := 142;
B.LoadFromFile(FileName);

Main.DXDraw.Surface.Canvas.StretchDraw(TempRect, B);
Main.DXDraw.Surface.Canvas.Release;
...
end;


Ну и 2 остальные процедура по тому же принцыпу.


 
Дьякон ФРОСТ   (2002-11-28 00:14) [3]

вопрос:
а ты только в TGame.PaintCurCard Canvas релиzаешь?
я с ДХ недавно zнаком но именно иz-zа того что zабывал иногда релиzать имел удовольствие соzерцать немало глюков.


 
сергей   (2003-04-09 15:53) [4]

Удалено модератором
Примечание: Задайте вопрос в отдельной ветке


 
A_n_t   (2003-04-10 05:43) [5]

А зачем ты вообще иcпользуешь TBitmap? Раз работаешь с DirectX, то и бери его родные поверхности TDirectDrawSurface. И канвас не надо юзать, и быстрее должно работать. Возможно в этом и состоит баг.


 
Мор   (2003-04-13 03:45) [6]

Используй Release:

with DXDraw.Canvas do
begin
...
TextOut(X, Y, "Test");
...
Release;
end;


 
Андрей   (2003-05-29 18:43) [7]

Удалено модератором
Примечание: Задайте вопрос в новой ветке


 
Плохой человек   (2003-05-29 20:13) [8]

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


 
Андрей   (2003-05-30 10:45) [9]

Как с помощью DelphiX вывести объемный текст, вращать его, а также проигрывать AVI



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

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

Наверх




Память: 0.48 MB
Время: 0.023 c
1-36618
Imshanya
2003-12-01 13:52
2003.12.12
Запуск из програмы OutlookExperess с параметрами.


11-36589
Ал
2003-03-28 14:12
2003.12.12
Как правильно объявить и вызвать функц., доступную из всех Юнитов


7-36853
Максим
2003-10-08 08:45
2003.12.12
Помогите !!!!!


1-36707
Лана Розанова
2003-11-26 20:38
2003.12.12
ListBox


1-36722
warman
2003-12-01 22:14
2003.12.12
Интересные вопросы по Richedit