Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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

Ну раз дело зашло так далеко, то придется самому написать подобные функции.


Наверх

Титульная страница Поиск, карта сайта Написать письмо