Ricardo, 

Na global declarations, constants, user declare: 
Number: EM_GetSel = 0x0400 + 0 

No Multilinefield escreva 
On SAM_KillFocus 
 Set nSelRange = SalSendMsg( hWndItem, EM_GetSel, 0, 0 ) 
 Set nFirstPosSel = SalNumberLow( nSelRange ) 
 Set nLastPosSel = SalNumberHigh( nSelRange ) 
 set sSql = SalStrMidX( MyValue, nFirstPosSel, nLastPosSel-nFirstPosSel ) 

Espero ter ajudado, 
Garcia. 

_________________________________________________________
Voce quer um iGMail protegido contra v�rus e spams? 
Clique aqui: http://www.igmailseguro.ig.com.br
Ofertas imperd�veis! Link: http://www.americanas.com.br/ig/

==============================================
Lista de Centura SQLWindows
Administrador : [EMAIL PROTECTED]
[ http://www.centuraexplorer.com ]
Para sair desta lista mande mensagem para:
[EMAIL PROTECTED] sem nada no Subject e
com o comando a seguir no corpo da msg:
"unsubscribe sqlwin" (sem as aspas)
==============================================

Responder a