Чтение файла в буфер

[Kroos]

Пытаюсь прочитать файлы картинок, а читается только первые несколько байт заголовка, а потом все, "конец файла"... почему?

Код: Выделить всё

Local Buffer, sFile AS STRING
sFile = "image.bmp"
IF ISFILE(sFile) THEN
    OPEN sFile FOR BINARY AS #1
    Buffer = STRING$(LOF(1),"0")
    GET #1, 1, Buffer
   CLOSE #1
END IF

? Buffer

В буфере - "BM Ђ "

C winapi такая же фигня... так как прочитать весь файл-то?
Если читаю не с 1го байта, то кусок данных падает в буфер, но опять же - кусок...

[jangle]

Код: Выделить всё

GET #1, Lof(1), Buffer

[pronto]

Код: Выделить всё

Local Buffer() as Byte

Open sFile For Binary As #1
   Redim Buffer(LOF(1)-1)
   Get #1, 1, Buffer
Close #1

[Kroos]

GET #1, Lof(1), Buffer

нет, это Binary, тут задаем не кол-во байт, а стартовую позицию. я и такой по смыслу вариант тоже пробовал, не читает, и с GET$ тоже облом. никак не читает, не пойму почему

Local Buffer() as Byte

Open sFile For Binary As #1
Redim Buffer(LOF(1)-1)
Get #1, 1, Buffer
Close #1

а вот так проканало, спасибо (только не Buffer а Buffer() )

[jangle]

GET #1, Lof(1), Buffer

нет, это Binary, тут задаем не кол-во байт, а стартовую позицию. я и такой по смыслу вариант тоже пробовал, не читает, и с GET$ тоже облом. никак не читает, не пойму почему

Все читает c GET$ :

Код: Выделить всё

    Get$ #1, Lof(1), Buffer   

[Kroos]

мм да, проверил длину Buffer, она равна размеру файла... видимо в виде обычной строки просто некорректно отображалось, обрезает на нулевых байтах... а вообще корректно так читать Binary в String ?

[Qwertiy]

а вообще корректно так читать Binary в String ?

Никак?

[jangle]

мм да, проверил длину Buffer, она равна размеру файла... видимо в виде обычной строки просто некорректно отображалось, обрезает на нулевых байтах... а вообще корректно так читать Binary в String ?

BSTR строка это просто буфер памяти, в нем можно хранить все что угодно

[Хакер]

BSTR строка это просто буфер памяти, в нем можно хранить все что угодно

За хранение там «чего угодно» надо бить кувалдой по темечку.

[jangle]

BSTR строка это просто буфер памяти, в нем можно хранить все что угодно

За хранение там «чего угодно» надо бить кувалдой по темечку.

это еще почему?

[Хакер]

это еще почему?

Уже обсуждалось тут: viewtopic.php?f=1&t=45649&hilit=bstr&start=0
Но вряд ли до тебя дойдёт, ведь до тебя недоходило, почему плохо на кнопку «Выход» садить вызов ExitProcess.

[jangle]

это еще почему?

Уже обсуждалось тут: viewtopic.php?f=1&t=45649&hilit=bstr&start=0
Но вряд ли до тебя дойдёт, ведь до тебя недоходило, почему плохо на кнопку «Выход» садить вызов ExitProcess.

Хамло высокомерное

[NashRus]

только не надо бана. он хороший

[bon818]

Хамло высокомерное

+1

только не надо бана. он хороший

Какой еще бана. даешь нормальный форум, без уничижительного тона с блекджеком и шлюхами.
Корректно читать Binary в String = PowerBasic Да да и да (язык позволяет, если удобно, доказывать не буду, не хошь как хошь.)

[DarkMachine]

Вот этот кусок кода - всегда работало и работает...

Код: Выделить всё

F = FREEFILE
OPEN file FOR BINARY AS #F
L = LOF(#F)
S = SPACE$(L)
GET$ #F, L, S
CLOSE #F