Форум: "Основная";
Текущий архив: 2003.08.07;
Скачать: [xml.tar.bz2];
ВнизКак в StatusBar-е писать по-русски? Найти похожие ветки
← →
tytus (2003-07-26 10:00) [0]Привет Всем. При выполнении проседуры:
var st:PChar;
begin
GetLogicalDriveStrings(1,st);
statusBar1.Panels.Items[0].Text:=StrPas(st);
в статусбаре пишеться что-то вроде ио8ьяГ<A3<ШЖ...
← →
KSergey (2003-07-26 10:22) [1]А буфер кто выделять будет? Хотя бы под тот 1 байт, который указан в первом параметре?
← →
Anatoly Podgoretsky (2003-07-26 10:54) [2]Зачем тебе вообще PChar, многие делают с ним так много ошибок, используй String
SetLength(st,размер);
GetLogicalDriveStrings(размер,PChar(st));
statusBar1.Panels.Items[0].Text:=st;
← →
default (2003-07-26 11:01) [3]нифига документацию не читаю
даже когда не "пашет"
сразу бегут на форум блин
← →
tytus (2003-07-26 11:11) [4]>Anatoly Podgoretsky
Спасибо, сработало, но почему-то пишет только а:\, хотя пишу SetLength(st,20)...
>KSergey
В хелпе сказано о буфере, но как его "выделять"? var st:Pointer или var st:^PChar? Пробывал последнее - пишет m^ m^ ????????
← →
KSergey (2003-07-26 11:16) [5]>KSergey
В хелпе сказано о буфере, но как его "выделять"?
Это сказано в хелпе по языку Delphi.
← →
Anatoly Podgoretsky (2003-07-26 11:20) [6]Опять документацию не читаешь, в результате возвращается блок ASCIZZ строк, заканчивает блок пустая строка
А ней даже пример приведен!
c:\<null>d:\<null><null>
Нельзя применять функции работы со строками для подобных строк, тебе надо самостоятельно извлекать из строки части, например с помощью той же PChar, последовательно смещая указатель на следующую часть или использовать функцию Copy/
И обязательно анализировать результат функции GetLogicalDriveStrings, она возвращает длину реальных данных в буфере. Эту длину нужно использовать при копировании частей. Кстати 20 байт явно не достаточно, надо как минимум 32*4, тогда результат гарантированно поместится в буфер и не будет ошибки.
← →
Anatoly Podgoretsky (2003-07-26 11:21) [7]KSergey © (26.07.03 11:16)
Это уже сделано в SetLength, но автор наверно не знает данного языка программирования, даже в азах.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.08.07;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.01 c