указатель

[Don Karleone]

есть функция, в качестве параметра в нее передается указатель L: pointer.
В этой функции есть локальная переменная B: integer;
Как переменной B присвоить значение первого байта, на который указывает L?
что не так: ??

B:=byte(L^)

[Человек_Борща]

вы приведение типов делаете, приводите указатель к байту. Что вроде не возможно.

B:=L^[0] передаем 0-ой байт

[GunSmoker]

что не так: ??

В указанном коде проблемы нет.

[Don Karleone]

Сообщение от GunSmoker

В указанном коде проблемы нет.

ну если бы проблемы не было, я бы сюда не писал! Я в книге видел, что-то вроде integer(msg^), где msg: pointer. По идее и у меня должно работать, но все время выдает ошибку во время выполнения проги на этой строке.

[GunSmoker]

Подсказка: это значит, что проблема в другом месте.

[Miha85193]

Сообщение от Don Karleone

ну если бы проблемы не было, я бы сюда не писал! Я в книге видел, что-то вроде integer(msg^), где msg: pointer. По идее и у меня должно работать, но все время выдает ошибку во время выполнения проги на этой строке.

Скорее всего произошло нарушение доступа к памяти! Например: L <> nil, но, по данному адресу пусто, в результате вылетает AV.

[Stilet]

но все время выдает ошибку во время выполнения проги

Какую? AV? Надо весь код смотреть.

[s-andriano]

Сообщение от Человек_Борща

вы приведение типов делаете, приводите указатель к байту. Что вроде не возможно.

B:=L^[0] передаем 0-ой байт

Он приводит к байту уже разыменованный указатель, т.е. как раз тот байт, что ему нужен, а у Вас вообще не понятно, сколько байт нужно взять по адресу L.

[Don Karleone]

Вообщем дело обстоит так:
я создаю DIB-секцию функцией CreateDIBSection(), где один из параметров, это указатель на массив байт созданного растра. Этот указатель я передаю своей функции, которая проделывает некую операцию с этими самыми байтами.
Проблема была в том, что перед вызовом своей функции я проделал следующее:

var
  Bitmap1: HBITMAP;
  DC: HDC;
  P1: pointer;
....

DC:=CreateCompatibleDC(0);
Bitmap1:=CreateDIBSection(..., P1, ...);
SelectObject(DC, Bitmap1);

//а здесь я вызвал свою функцию и передал ей указатель P1

Проблемы нет, если я вызываю свою функцию до вызова SelectObject(...);
Почему именно так, не знаю.

[GunSmoker]

Ну, даже паяльник не понадобился.

Вопрос №1: где обработка ошибок? С чего ты взял, что в P1 допустимый указатель?