![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Integer->PChar->Integer. как?
zaN0za © (2005-11-06 14:10:00)Доброго времени суток, уважаемые мастера.
у меня к вам такой вопрос:
кто-нибудь знает каким образом можно выполнить преобразование
Integer->PChar и PChar->Integer? про процедуры Val и Str знаю. но
проект пишется без использования модуля System, поэтому нужно
какое-то другое решение.
жду ваших предложений.
спасибо за внимание.
sniknik (2005-11-06 15:11:00) [1]> а с чего начать? как подступиться?
с этого
http://www.delphimaster.ru/cgi-bin/forum.pl?n=10
поищи по форуму "замены KOl"
zaN0za (2005-11-06 15:00:00) [2]
>без использования модуля System
прошу прощения, конечно же с модулем System! но он имеет такой вид:
unit System;
interface
procedure _HandleFinally;
type
TGUID = record
D1: LongWord;
D2: Word;
D3: Word;
D4: array [0..7] of Byte;
end;
PInitContext = ^TInitContext;
TInitContext = record
OuterContext: PInitContext;
ExcFrame: Pointer;
InitTable: pointer;
InitCount: Integer;
Module: pointer;
DLLSaveEBP: Pointer;
DLLSaveEBX: Pointer;
DLLSaveESI: Pointer;
DLLSaveEDI: Pointer;
ExitProcessTLS: procedure;
DLLInitState: Byte;
end;
implementation
procedure _HandleFinally;
asm
end;
end.
> MBo © (06.11.05 14:28) [1]
а с чего начать? как подступиться? честно говоря, я даже не представляю пока...
MBo (2005-11-06 14:28:00) [3]>но проект пишется без использования модуля System
Ну раз дело зашло так далеко, то придется самому написать подобные функции.