Спасибо, работает. Выглядит примерно так (только ногами по голове за код не бить:)):

## Код:
```
table.Exec("SELECT * FROM Table1");
         table.Read(SqlDB.names, names); (*считываем заголовок таблицы*)

         len := LEN(names.fields); pos := -1; i := 0;
         WHILE len > i DO
            IF (names.fields[i]^ = name) THEN pos := i END; 
            INC(i);
         END;

         IF pos # -1 THEN
            table.Read(1, row); (*а теперь считываем первую строку таблицы*)
            StdLog.String(row.fields[pos]);
         END;
```
