Текущий архив: 2007.02.25;
Скачать: CL | DM;
Вниз
Функция Length Найти похожие ветки
← →
LongInt (2007-02-03 15:45) [0]Может ли функция Length в каких-то случаях вернуть минусовое значение? Т.е. следует указывать только проверку на нуль?
Str := "123";
if Length(Str) <= 0 then Exit;
....
← →
Olivetti (2007-02-03 15:57) [1]Может ли функция Length в каких-то случаях вернуть минусовое значение?
Нет.
← →
TUser © (2007-02-03 16:57) [2]procedure TForm1.Button1Click(Sender: TObject);
var a: string;
p: ^integer;
begin
a := "blablabla";
p := @a[1];
p := pointer (longint (p) - 4);
p^ := -10;
ShowMessage (inttostr (length (a)));
end;
:)
Страницы: 1 вся ветка
Текущий архив: 2007.02.25;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.05 c
