Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Go Back   Foros Club Delphi > Principal > Varios
Register FAQ Members List Calendar Guía de estilo Search Today's Posts Mark Forums Read

Coloboración Paypal con ClubDelphi

Reply
 
Thread Tools Search this Thread Display Modes
  #1  
Old 04/12/2012
Walterio Walterio is offline
Miembro
 
Join Date: Nov 2006
Posts: 46
Poder: 0
Walterio Va por buen camino
Ejecutar procedure OnGetText "manualmente"

Hola a todos...
Trabajo con Delphi 6, ADOQuery, datasetproviders y TClientDataset.
Lo que necesito hacer es lo siguiente:
Tengo algunos campos de mi clientdataset que son del tipo internalcalc a los que les asigno un procedure en su propiedad OnGetText y estos funcionan perfectamente, pero desde una procedure genérica que trata a los campos de mi clientdataset dándole un formato de ancho, si el campo es visible o no desde una grilla genérica, le asigna títulos, etc, necesito ejecutar el OnGetText asociado al campo.
Ya pude detectar que campos tienen asignado este evento :

Código Delphi [-]
For i := 0 to (cdsMaster.FieldCount - 1) do
begin
      If (cdsMaster.Fields[i].FieldKind = fkInternalCalc) then
        If Assigned(cdsMaster.FieldByName(cdsMaster.Fields[i].FieldName).OnGetText ) then
        //Aqui deberia ejecutar el OnText del campo seleccionado...
       //Este es un engendro horrible que intent{e desde mi ignorancia, pero, obviamente, error :
      (cdsMaster.FieldByName(cdsMaster.Fields[i].FieldName).OnGetText as TProcedure).Execute ; 

End;

Sugerencias, son todas bienvenidas.

Muchas gracias.
Reply With Quote
  #2  
Old 05/12/2012
afxe afxe is offline
Miembro
 
Join Date: Jul 2004
Location: Malaga-España
Posts: 295
Poder: 23
afxe Va por buen camino
Prueba : cdsMaster.FieldByName(cdsMaster.Fields[i].FieldName).DisplayText, creo que este método tira del onGetText para devolver el dato almacenado en el campo.

Por cierto, no necesitas tipificarlo, puedes poner directamente: cdsMaster.Fields[i].DisplayText
__________________
Amar al mundo apasionadamente.
Reply With Quote
  #3  
Old 05/12/2012
Walterio Walterio is offline
Miembro
 
Join Date: Nov 2006
Posts: 46
Poder: 0
Walterio Va por buen camino
Muchas gracias por la sugerencia, lo pruebo y comento.

Nuevamente gracias y saludos.
Reply With Quote
Reply


Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Permisos a un "procedure" o "function" snapscanes API de Windows 1 19/01/2011 00:16
Actualización columnas "dinámicas" en Store Procedure fjcg02 Firebird e Interbase 2 19/01/2010 08:44
Comando "Ejecutar" de Windows XP, desde Delphi BuRtOn Varios 15 25/08/2008 17:07
Necesito llamar a métodos de clases "hija" desde su clase "padre" Flecha OOP 17 20/04/2007 00:03
STORE PROCEDURE "RETURNS". barman PHP 0 01/07/2004 12:10


All times are GMT +2. The time now is 10:20.


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