![]() |
![]() |
| Paypal | 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 |
|
#2
|
||||
|
||||
|
La verdad ahora mismo no recuerdo si existen una UDF en interbase para hacer lo que pides, pero si es urgente con código Delphi recorres la tabla y lo arreglas:
Código:
procedure TForm1.Button1Click(Sender: TObject);
Var
s:String;
begin
s:=Edit1.text;
Delete(s, Pos('-',edit1.text),1);
edit1.Text:=s;
end;
Un Saludo.
__________________
Guía de Estilo de los Foros Cita:
|
| Herramientas | Buscar en Tema |
| Desplegado | |
|
|
|