| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Функция Length
LongInt © (2007-02-03 15:45:00)Может ли функция Length в каких-то случаях вернуть минусовое значение? Т.е. следует указывать только проверку на нуль?
Str := '123';
if Length(Str) <= 0 then Exit;
....
TUser (2007-02-03 16:57:00) [1]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;
:)
Olivetti (2007-02-03 15:57:00) [2]Может ли функция Length в каких-то случаях вернуть минусовое значение?
Нет.
| |
