| Вопрос: Размер файла | Добавлено: 12.11.05 18:00 |
Автор вопроса:  Zoomie
|
| Как узнать размер файла в PowerBasic, а то в VB функция FileLen , а тут нет. |
| Ответы | Всего ответов: 4 |
|
Номер ответа: 1 Автор ответа:  HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #1 | Добавлено: 12.11.05 18:36 |
|
API
GetFileSize |
||
|
Номер ответа: 2 Автор ответа: Zoomie Вопросов: 3 Ответов: 4 |
Профиль | | #2 | Добавлено: 12.11.05 19:57 |
| А кодик можно? | ||
|
Номер ответа: 3 Автор ответа: HACKERРазработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | | #3 | Добавлено: 13.11.05 01:40 |
хм... Х.З... GetFileSize, ей хендел какой то нужен, с CreateFileNS которая должна получать этот хендел тоже не разобрался  А GetFileVersionInfoSize чё-то не то возвращает, так что вот тебе без API
#COMPILE EXE
#INCLUDE "Win32Api.inc" FUNCTION PBMAIN () AS LONG  IM File_size AS LONG
IM n AS BYTE
n = FREEFILE OPEN "C:\Windows\notepad.exe" FOR INPUT AS #n: File_size = LOF(n):CLOSE #n MSGBOX "Size ="+STR$(File_size) ExitProcess GetExitCodeProcess(GetCurrentProcess, 0) END FUNCTION |
||
|
Номер ответа: 4 Автор ответа: ZoomieВопросов: 3 Ответов: 4 |
Профиль | | #4 | Добавлено: 13.11.05 14:41 |
|
Супер большое спасиби!
|
||
Страница: 1 |