tdLast
Struttura
tdLast(iDataSet)
Tipo
Procedura
Descrizione
Questa funzione sposta uno dei tre set di dati temporanei all'ultimo record.
Parametri: 1
iDataSet = numero del set di dati; deve essere compreso tra 1 e 10. IndySoft mette a disposizione 10 set di dati accessibili tramite le funzioni di script personalizzate "td*".
Esempio
if tdDoSQLRecords(1, 'SELECT COMPANY_NAME FROM COMPANY ORDER BY COMPANY_NAME') then
tdLast(1)
while (tdBOF(1) = '0')
sCompanyName = tdFieldbyNameAsString(1, 'COMPANY_NAME')
iCount = 0
if tdDoSQLRecords(2, 'SELECT COUNT(*) AS COUNTER FROM GAGES WHERE COMPANY = '' & sCompanyName & ''') then
iCount = tdFieldbyNameAsInteger(2, 'COUNTER')
End If
ShowMessage('Azienda: ' & sCompanyName & Chr(13) &
'Numero di misuratori: ' & IntToStr(iCount))
tdPrior(1)
End While
End If |