Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.10.24;
Скачать: [xml.tar.bz2];

Вниз

Помогите, люди! Глюк в мей проге!   Найти похожие ветки 

 
LaResistance   (2002-10-12 00:46) [0]

Создал я свой собственный класс:
type
TBaseSprite = class
PosX, PosY : Integer;
SpriteWidth : Integer;
SpriteHeight : Integer;
procedure Show(var FDDSurfBack, FDDSurfImages : IDirectDrawSurface7); virtual; abstract;
private
rcRect : TRect;
end;
TCollideInfo = record
X, Y : Integer;
end;

TSprite = class(TBaseSprite)
Delay : DWORD;
.............// Здесь ещё куча переменных
constructor Create (const SprDelay : DWord; FrmCount, SprWidth, SprHeight : integer);
function GetCenterX : Integer;
function GetCenterY : Integer;
.............// И здесь
procedure Show (var FDDSurfBack, FDDSurfImages : IDirectDrawSurface7); override;
private
Xinc : Integer;
Yinc : Integer;
CollideInfo : TCollideInfo;
ThisTickCount : DWORD;
LastTickCount : DWORD;
end;

...........

var
Spr : TSprite;

Это я работаю с DirectDraw. Но дело не в нём.
Короче, процедура доходит до определённой строчки, где я присваиваю значение (допустим Spr.PosX := 10;) или сравниваю
(if Spr.Delay > 100 then beep;) и дальше - процедура невтемно заканчивается!!! Строчка beep; уже не выполняется! Почему?
Если вы заинтересовались этим вопросом, то лучше оставьте мыло и я скину вам исходник (Без EXE и тупых приколов). Если у вас нету библиотек DirectDraw - то скажите, тоже скину. Единственное - DirectDraw под D6 вроде бы не пашет. Хотя наверное глюк в моей проге далеко не от DirectDraw (работаю под D5). Руки такие :) !!!!
Спасибо.


 
Юрий Зотов   (2002-10-12 01:04) [1]

Прежде, чем работать с объектом, создать его не забыли?


 
LaResistance   (2002-10-12 19:22) [2]

В том то и дело, создаёшь его (Spr.Create(.....);) - тоже дальше ничерта не пашет!!!


 
ZrenBy   (2002-10-12 19:26) [3]

Spr := TSprite.Create(...)


 
Anatoly Podgoretsky   (2002-10-12 19:43) [4]

Приведи больше кода с ошибкой, обязательно создание


 
Юрий Зотов   (2002-10-12 22:59) [5]

Spr.Create(.....) - это где же Вы видели такое "создание"?

См.: ZrenBy © (12.10.02 19:26)



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

Форум: "Основная";
Текущий архив: 2002.10.24;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.56 MB
Время: 0.04 c
6-78551
Ksion
2002-08-17 16:44
2002.10.24
Авторизация через инет


4-78715
pasha_golub
2002-09-10 19:07
2002.10.24
FindChangeNotification


14-78622
RV
2002-09-30 17:11
2002.10.24
а говорили, по радио, сегодня день Интернета


8-78547
MJH
2002-06-24 13:20
2002.10.24
Есть психи, разобравшие WMA по байтикам? :)


3-78256
Gaber
2002-10-02 10:43
2002.10.24
DBRadioGroup





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