Главная страница
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.012 c
15-1252419013
Rule
2009-09-08 18:10
2009.11.08
Как поменять комбинацию клавиш в делфи ИДЕ 7


2-1253800991
N/O
2009-09-24 18:03
2009.11.08
вопрос по TClientDataSet


1-1223062788
FlashParty
2008-10-03 23:39
2009.11.08
Delphi 2007 — INDY 10 — Работа с Gmail


1-1221328691
ПЗ
2008-09-13 21:58
2009.11.08
Классы в DLL на Delphi и MSVC++ (бой продолжается)...


2-1253858285
Johnnnn
2009-09-25 09:58
2009.11.08
IWebBrowser2 из webbrowser1.document.frames.item(i)