![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
![]() |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
mira yo lo hice asi es otra opcion
var codigo: string; pos: integer; begin codigo:= form1.Edit1.Text; pos:= ansipos('/',codigo); delete(codigo,pos,length(codigo)); form1.Edit1.Text:= codigo; end; a ver que te parece.... Saludos Sebastian |
![]() |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
![]() |
|