Всем hi, народ, подскажите, как рашеть проблему с делфями. Дело в том, что при вызове АПИ функций глобальные переменные тупо затираются, что, в общем-то, нежелательно. Что делать?

-----
Stuck to the plan, always think that we would stand up, never ran.

| Сообщение посчитали полезным:

???
Можно подробнее, пример кода и т.д. АПИ функции никак не могут затереть глобальные переменные, как и локальные если не захочишь

-----
Yann Tiersen best and do not fuck

| Сообщение посчитали полезным:

PE_Kill
...\поскипано
filehandle:=GetFileHandle(fileName);
MessageboxA(0,'Name',fileName,MB_OK);
...//поскипано
function GetFileHandle(fileName:PChar):Cardinal;
begin
result:=CreateFileA(fileName,...//ну, дальше сам допиши, думаю, суть ясна);
end;


-----
Stuck to the plan, always think that we would stand up, never ran.

| Сообщение посчитали полезным:

ARCHANGEL
И что у тебя здесь затирается? fileName затираться не может...

| Сообщение посчитали полезным:

HoBleen
Может, и не может, однако, собака, затирается. Под Олькой смотрел - его значение копируется в ESI из EAX, а потом оба прекрасно затираются, и messageboxa нихрена не показывает

-----
Stuck to the plan, always think that we would stand up, never ran.

| Сообщение посчитали полезным:

хз, специально скомпилял тока что проект с предложенным кодом - ничего не затирается.
ЗЫ: компилял в дельфи 7

| Сообщение посчитали полезным:

Ничего не затирается, проверяй:
const
NameOfFile = 'C:\Hacker\Tools\Necessary\brain.vxd';
//======
procedure TForm1.Button1Click(Sender: TObject);
function GetFileHandle(fileName:PChar):Cardinal;
begin
result:=CreateFileA(fileName,GENERIC_READ, FILE_SHARE_READ, nil, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);
end;
var
FileName: PChar;
FileHandle: Cardinal;
begin
FileName := PChar(NameOfFile);
Filehandle:=GetFileHandle(fileName);
MessageboxA(0,fileName,'Name',MB_OK);
//CloseHandle(filehandle);
end;

| Сообщение посчитали полезным:

ARCHANGEL попробуй сделать fileName типа String, а там где надо PChar вызывай PChar(fileName)

-----
Yann Tiersen best and do not fuck

| Сообщение посчитали полезным:

> , а там где надо PChar вызывай PChar(fileName)
имхо красивее @fileName[1] ;)

-----
Shalom ebanats!

| Сообщение посчитали полезным:

SLV пишет:
имхо красивее @fileName[1] ;)
Кому как, мне наоборот...

-----
Yann Tiersen best and do not fuck

| Сообщение посчитали полезным:

PE_Kill, лучше самому задавать адреса, чем полагаться на приведение типов компилятором имхо

-----
Shalom ebanats!

| Сообщение посчитали полезным:

SLV пишет:
чем полагаться на приведение типов компилятором
А есть примеры проблем с привидением типов компилятором? Помоему он сам всё неплохо приводит

-----
radio uno in ibisa ...

| Сообщение посчитали полезным:

так как я написал проще отлаживать код :P

-----
Shalom ebanats!

| Сообщение посчитали полезным:

SLV чем проще?

-----
Yann Tiersen best and do not fuck

| Сообщение посчитали полезным:

PE_Kill, ну если задача другая... например надо обратиться к N'ной букве... там индекс если перепутаешь... в общем моё мнение так лучше...

-----
Shalom ebanats!

| Сообщение посчитали полезным: