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

Вниз

AccessViolation   Найти похожие ветки 

 
cross   (2010-11-26 13:14) [0]

Почему возникает ошибка?

var
 S: string;
begin
 S := RT_RCDATA;
 ShowMessage(S);
end;


 
RWolf ©   (2010-11-26 13:15) [1]

в этом коде всё правильно.


 
RWolf ©   (2010-11-26 13:17) [2]

хотя, нет, вру — что-то в ресурсах не инициализировано.


 
RWolf ©   (2010-11-26 13:18) [3]

const
 RT_RCDATA       = PChar(10);


 
Anatoly Podgoretsky ©   (2010-11-26 13:19) [4]

> cross  (26.11.2010 13:14:00)  [0]

Что такое RT_RCDATA


 
cross   (2010-11-26 13:20) [5]


> const
>  RT_RCDATA       = PChar(10);


в смысле? Мне переобъявить в моем модуле? Почему все-таки сыпется AccessViolation. Работаю в Delphi XE.


 
RWolf ©   (2010-11-26 13:22) [6]


> cross   (26.11.10 13:20) [5]

Просто не нужно присваивать это значение строке.


 
RWolf ©   (2010-11-26 13:25) [7]

а сыплется потому, что обращение к памяти по адресу 10 вызывает нарушение доступа.


 
cross   (2010-11-26 13:29) [8]


> Что такое RT_RCDATA


тип ресурса.


> Просто не нужно присваивать это значение строке


мне нужно формировать строку "res://[имя файла]/[тип ресурса]/[имя ресурса]".

Format("res://%s/%s/%s", [ParamStr(0), Ares_type, Ares_name])

Ares_type: string; // тип ресурса


 
RWolf ©   (2010-11-26 13:39) [9]


> мне нужно формировать строку

RT_RCDATA — это идентификатор, в откомпилированной программе такого набора символов нет.


 
clickmaker ©   (2010-11-26 13:53) [10]

Ares_type := "#10";



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

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

Наверх




Память: 0.48 MB
Время: 0.012 c
15-1283411101
George
2010-09-02 11:05
2011.02.20
Еще немного музыки


3-1253187389
harisma
2009-09-17 15:36
2011.02.20
Помогите оптимизировать скрипт


15-1289568102
Медвежонок Пятачок
2010-11-12 16:21
2011.02.20
ипонский городо... голограммОй


15-1288631685
Tema
2010-11-01 20:14
2011.02.20
Как зарегистрироваться на Embarcadero?


15-1285092027
George
2010-09-21 22:00
2011.02.20
InnoSetup, Firebird Server