var v:variant;
TrimRight(v);
И где можно прочитать об этом?
Почему не работает следующее:
Модератор: Модераторы
-
Replicator
- постоялец
- Сообщения: 154
- Зарегистрирован: 30.04.2006 17:14:45
- Откуда: Outer Heaven
- Контактная информация:
Компилятор не может определить тип переменной v:
Однако, интересно. При использовании привидения типов ничего не произошло:
Error: Can't determine which overloaded function to call
Однако, интересно. При использовании привидения типов ничего не произошло:
Код: Выделить всё
program p;
uses
sysutils, variants;
var
v: variant;
begin
v := ' sgf jsfg j sfj s ';
TrimRight(string(v));
writeln(v, '<');
end.Код: Выделить всё
E:\MyProjects\fpc>fpc p
Target OS: Win32 for i386
Compiling p.pp
Linking p.exe
10 Lines compiled, 1.2 sec
E:\MyProjects\fpc>p
sgf jsfg j sfj s <
E:\MyProjects\fpc>- Sergei I. Gorelkin
- энтузиаст
- Сообщения: 1409
- Зарегистрирован: 24.07.2005 14:40:41
- Откуда: Зеленоград
-
Replicator
- постоялец
- Сообщения: 154
- Зарегистрирован: 30.04.2006 17:14:45
- Откуда: Outer Heaven
- Контактная информация:
Блин! Во я дебил...
Вот так все работает:
Вот так все работает:
Код: Выделить всё
program p;
uses
sysutils, variants;
var
v: variant;
begin
v := ' sgf jsfg j sfj s ';
v := TrimRight(string(v));
writeln(v, '<');
end.