Главная страница
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.028 c
15-1149579065
Труп Васи Доброго
2006-06-06 11:31
2006.07.02
Вопрос суперзнатокам Excel


1-1148549206
D@Nger
2006-05-25 13:26
2006.07.02
Работа с считывателем пластиковых карт


15-1149513475
infom
2006-06-05 17:17
2006.07.02
Компоненты для работы с большими целыми числами.


3-1146815925
Nike
2006-05-05 11:58
2006.07.02
Как установить значения поля по умолчанию в добавляемой записи


15-1149585086
Ribachok
2006-06-06 13:11
2006.07.02
Как создать отчёт в Delphi 7