[Adrenalin666]

Код:

"поправка"
var
n1,b,c: integer;
begin
mess:=copy(mess,2,length(mess));
n1:=pos(' ',mess);
b:=strTOfloat(copy(mess,1,n1-1));
c:=strTOfloat(copy(mess,n1+1,length(mess)-1));
SetCursorPos(b,c);

выдает ошибку в b:=strTOfloat(copy(mess,1,n1-1));
c:=strTOfloat(copy(mess,n1+1,length(mess)-1));
; incompatible types: 'Integer' and 'Extended'

[eXplorer]

кординаты SetCursorPos(b,c); не могут быть Real...

попробуй:

Код:

SetCursorPos(trunc(b),trunc(c));

[eXplorer]

я не успел написать... уже сообщение изменилось

[eXplorer]

а что такое mess

[Adrenalin666]

это сообщение входящее я присылаю координаты они присваиваются b и c и перемещается курсор

[friz]

хм... переменные b,c у тебя integer? ну так какого лешего ты хочешь ей присвоить число типа real?
Может надо так?

Код:

b:=strTOint(copy(mess,1,n1-1));
c:=strTOint(copy(mess,n1+1,length(mess)-1));

или так ?

Код:

var
n1:integer;
b,c: real;

[eXplorer]

b:=strTOfloat(copy(mess,1,n1-1));
c:=strTOfloat(copy(mess,n1+1,length(mess)-1));

strTOfloat неполучиться присвоить типу целого числа integer...
тогда уж strToInt


friZ меня опередил