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

Вниз

Конвертация данных типа Char!   Найти похожие ветки 

 
Ошибка:)   (2006-06-08 18:22) [0]

Здравствуйте уважаемые !
Проблема такая:
Создал процедуру искуственно выводящюю диалог типа ошибки, мне нужно что бы в тексте самого сообщения был полный путь и название программы! Немогу перевести тип данных Char в String! Помогите плиз ! Искал много найти немог ! :(

Вот тело процедуры:
procedure ErrorMessage;
var AppFileName: array[0..255] of Char;
begin
GetModuleFileName(MainInstance,AppFileName,SizeOf(AppFileName));
MessageBox(0, AppFileName+"исскуственно генирируемая ошибка.", AppFileName, MB_ICONSTOP or
MB_OK);
end;

Заранее спасибо !


 
xShadow ©   (2006-06-08 18:42) [1]

MessageBox(0, PChar( AppFileName +"исскуственно генирируемая ошибка."), AppFileName, MB_ICONSTOP or

Только при чём тут WinApi ?


 
Ошибка:)   (2006-06-08 18:48) [2]

Насколько я понимаю функция GetModuleFileName(MainInstance,AppFileName,SizeOf(AppFileName)); это WinApi или я неправ !? А у меня и не получаеться ковертировать ее результат в тип String!


 
Ошибка:)   (2006-06-08 18:52) [3]

Спасибо за вариант ответа!
Но на будущее если мне понадобиться не так обойти проблему а именно конвертировать этот тип в String то как это сделать?


 
xShadow ©   (2006-06-08 21:19) [4]


> Но на будущее

http://www.google.ru/search?hl=ru&q=%D0%BF%D1%80%D0%B5%D0%BE%D0%B1%D1%80%D0%B0%D0%B7%D0%BE%D0%B2%D0%B0%D0%BD%D0%B8%D0%B5+%D1%82%D0%B8%D0%BF%D0%BE%D0%B2+%D0%B2+delphi&btnG=%D0%9F%D0%BE%D0%B8%D1%81%D0%BA+%D0%B2+Google&lr=


 
Desdechado ©   (2006-06-09 11:17) [5]

ParamStr(0)



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

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

Наверх




Память: 0.47 MB
Время: 0.031 c
15-1149438789
Колдун
2006-06-04 20:33
2006.07.02
Вопрос про Властелина Колец


2-1149901653
Fantasy
2006-06-10 05:07
2006.07.02
help


15-1149551726
Nevilon
2006-06-06 03:55
2006.07.02
Потестите, плиз, прогу


2-1149756378
worldmen
2006-06-08 12:46
2006.07.02
SQL. Вывод первых несколько записей


2-1150047962
Adios
2006-06-11 21:46
2006.07.02
ShellListView