Главная страница
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.064 c
1-1146810650
Glum
2006-05-05 10:30
2006.07.02
Индексация *.doc файлов


4-1143057564
microcomp2005
2006-03-22 22:59
2006.07.02
Вопрос к знатокам железа по COM портам.


3-1146831909
TheEd
2006-05-05 16:25
2006.07.02
IBX: Связь master-detail в запросах


3-1146898813
arhis
2006-05-06 11:00
2006.07.02
Удаление записей в АДО


15-1148544478
Agent13
2006-05-25 12:07
2006.07.02
2007 Microsoft Office System Beta 2