Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.11.08;
Скачать: CL | DM;

Вниз

ansistring   Найти похожие ветки 

 
redlord   (2009-09-23 02:00) [0]

всем привет.
народ подскажите
как узнать сколько байт в переменной типа s3:ansistring занято данными, а не сколько было зарезервировано в результате выполнения
setlength(s3,512)

var
s1,s2:pansichar;
sansi:ansistring;
s3:ansistring;
sstr:string;
begin
   sstr:="g:\";
   sansi:=sstr;
   s2:="1.txt";

  setlength(s3,512);
 
  if SearchTreeForFile(addr(sansi[1]),s2, addr(s3[1])) =true then
  begin
    sstr:=s3;        
    showmessage(sstr);
  end;

end;

p.s.
это не рабочий код , а попытка понять что к чему,
поэтому много лишних перетусовок.
пример для delphi 2009


 
Германн ©   (2009-09-23 02:46) [1]


> redlord   (23.09.09 02:00)
>
> всем привет.
> народ подскажите
> как узнать сколько байт в переменной типа s3:ansistring
> занято данными, а не сколько было зарезервировано в результате
> выполнения
> setlength(s3,512)

Все что было зарезервировано, всё занято данными.
Прочие ответы после четкой формулировки вопроса и представления реализации функции SearchTreeForFile.


 
brother ©   (2009-09-23 04:37) [2]

> setlength(s3,512)

s3 имеет длину 512 байт.

> Прочие ответы после четкой формулировки вопроса и представления
> реализации функции SearchTreeForFile.

а там признак #13#10 или #10#10 не может быть если было присвоение? или длинна урежется?


 
Anatoly Podgoretsky ©   (2009-09-23 09:20) [3]


> как узнать сколько байт в переменной типа s3:ansistring
> занято данными, а не сколько было зарезервировано в результате
> выполнения
> setlength(s3,512)

512 и плюс один байт терминатор ASCIIZ



Страницы: 1 вся ветка

Текущий архив: 2009.11.08;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.01 c
15-1252355407
Юрий
2009-09-08 00:30
2009.11.08
С днем рождения ! 8 сентября 2009 вторник


1-1223538062
Игорь
2008-10-09 11:41
2009.11.08
Вопрос про GetProcessMemoryInfo


8-1198080757
Alex Pan
2007-12-19 19:12
2009.11.08
Где найти компоненет для видеоввода


2-1253690592
QAZ
2009-09-23 11:23
2009.11.08
Аналог writeln


15-1251837650
Кто б сомневался
2009-09-02 00:40
2009.11.08
Запрет на изготовление ламп накаливания на 100 ватт в Европе