Ok, les pido perdon porque ahi me comi el '=', aunque ese no era el error, el problema era que en el project estaba
el error : Incompatible types : 'Integer' and 'String' ..
y el codigo quedo asi!
Código Delphi
[-]
var
ItemSelect: String;
begin
ItemSelect := LstBOX.Items[LstBOX.Itemindex];
Edit5.Text := copy(ItemSelect,1, pos(' ', ItemSelect)-1);
Saludos, gracias por responder y perdonen por la confusion!!