| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Прорисовка в DelphiX
Nostradamus © (2002-10-08 18:47:00)
Доброго времени суток, мастера,
Вот пишу свою первую игру с использованием DelphiX.
Есть у меня несколько процедур которые рисую определённые части интерфейса. Иногда когда я вызываю их поочерёдно и в конце пишу DXDraw.Flip и оно рисует только то что выводит последняя процедура. Что интересно если сразу же выполнить тот же код (последовательность процелр и Flip) всё прорисовывается нормально. Не пойму почему.
P.S. Надеюсь я не слишком запутанно сформулировал вопрос.
Андрей (2003-05-30 10:45:00) [1]
Как с помощью DelphiX вывести объемный текст, вращать его, а также проигрывать AVI
Плохой человек (2003-05-29 20:13:00) [2]
Удалено модератором
Андрей (2003-05-29 18:43:00) [3]
Удалено модератором
Примечание: Задайте вопрос в новой ветке
Мор (2003-04-13 03:45:00) [4]
Используй Release:
with DXDraw.Canvas do
begin
...
TextOut(X, Y, "Test");
...
Release;
end;
A_n_t (2003-04-10 05:43:00) [5]
А зачем ты вообще иcпользуешь TBitmap? Раз работаешь с DirectX, то и бери его родные поверхности TDirectDrawSurface. И канвас не надо юзать, и быстрее должно работать. Возможно в этом и состоит баг.
сергей (2003-04-09 15:53:00) [6]
Удалено модератором
Примечание: Задайте вопрос в отдельной ветке
Дьякон ФРОСТ (2002-11-28 00:14:00) [7]
вопрос:
а ты только в TGame.PaintCurCard Canvas релиzаешь?
я с ДХ недавно zнаком но именно иz-zа того что zабывал иногда релиzать имел удовольствие соzерцать немало глюков.
Nostradamus (2002-10-11 15:54:00) [8]
Оказывается кстати это происходит только в 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 остальные процедура по тому же принцыпу.
Ibrik (2002-10-11 13:17:00) [9]
Выложи сюда куок кода
| |
