Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > PostgreSQL
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 11-03-2013
willwallace willwallace is offline
Miembro
NULL
 
Registrado: feb 2013
Posts: 10
Poder: 0
willwallace Va por buen camino
Buenas noches
Si verifico las propiedades en parametros me muestra 4 los cuales son "0:ftString direccion=pdReturnValue; a:ftFloat direccion=pdInput; b:ftFloat direccion=pdInput; fecha:ftDateTime direccion=pdInput"

la expresion
Código Delphi [-]
VarType (dm.AdoStorecProc.Parameters.Items[0].Value);
No me visualiza resultado alguno, cuando lo coloco de esta manera:
Código Delphi [-]
 ShowMessage(VarType (dm.AdoStorecProc.Parameters.Items[0].Value));
me da error e indica "Incompatible types:'string and Word' "
y cuando lo pongo de esta forma:
Código Delphi [-]
ShowMessage(dm.AdoStorecProc.Parameters.Items[0].Value);
me muestra resultado de la siguiente forma "{2.1,8.4}" para los valores ingresados 4.2 y 2 la clave esta en manipular estos valores para asignarlos a un edit, que aun no lo logro.
Gracias por la atencion, estare atento
Responder Con Cita
  #2  
Antiguo 11-03-2013
Avatar de Al González
[Al González] Al González is offline
In .pas since 1991
 
Registrado: may 2003
Posts: 5.604
Poder: 30
Al González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en bruto
Gracias willwallace.

Eso quiere decir que el resultado viene como cadena de caracteres. Para lo último que comentas, te pongo un sencillo ejemplo:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
Var
  I :Integer;
  R, S1, S2 :String;
begin
  R := '{2.1,8.4}';
  I := Pos (',', R);
  S1 := Copy (R, 2, I - 2);
  S2 := Copy (R, I + 1, Length (R) - (I + 1));
  ShowMessage (S1);
  ShowMessage (S2);
end;
Responder Con Cita
  #3  
Antiguo 11-03-2013
willwallace willwallace is offline
Miembro
NULL
 
Registrado: feb 2013
Posts: 10
Poder: 0
willwallace Va por buen camino
Thumbs up

Muchas gracias, esa fue la solucion, para entenderla realmente tuve q investigar como funciona "Pos"y"Copy" pero me fue de gran ayuda logrando lo deseado
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
ADOStoredProc vs ADoQuery lgarcia Debates 0 11-04-2006 22:06:07
ADOStoredProc error Juanito-Kun SQL 5 24-05-2005 19:53:15
cargar un EDIT con el resultado de un AdoStoredProc cocoliso Conexión con bases de datos 4 12-05-2005 04:06:25
Problema con ADOStoredProc ernestocad SQL 4 06-04-2005 16:42:31
Urge: Manipular un array en una tabla TDBASE mrmanuel Conexión con bases de datos 3 08-09-2003 16:25:20


La franja horaria es GMT +2. Ahora son las 06:27:07.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi