tdFieldByNameAsString
Estrutura
tdFieldByNameAsString(iDataSet, sFieldName)
Tipo
Função
Descrição
Esta função recupera o valor do campo indicado por sFieldName como uma cadeia de caracteres (texto) para o conjunto de dados selecionado — aplicável apenas a campos de texto.
Parâmetros: 2
iDataSet = número do conjunto de dados; deve ser um número entre 1 e 10. A IndySoft disponibiliza 10 conjuntos de dados que podem ser acedidos através das funções de script personalizadas «td*».
sFieldName=nome do campo a recuperar.
Exemplo
if tdDoSQLRecords(1, 'SELECT COMPANY_NAME FROM COMPANY ORDER BY COMPANY_NAME') then
tdFirst(1)
while (tdEOF(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('Empresa: ' & sCompanyName & Chr(13) &
'Contagem de medidores: ' & IntToStr(iCount))
tdNext(1)
End While
End If |