Автор | Сообщение |
|
| |
Пост N: 184
Зарегистрирован: 19.05.05
|
|
Отправлено: 24.12.15 11:40. Заголовок: Структуры в HARBOUR
Может я как-то пропустил или не заметил в документации Есть ли в HARBOUR возможность организовывать структуры, наподобие как в С. Данные записал в структуру, и они все разложены по полям. Или нужно самому вручную все раскладывать! Ну или как вариант через DBF ?
|
|
|
Новых ответов нет
[см. все]
|
|
|
| |
Пост N: 730
Зарегистрирован: 20.02.11
|
|
Отправлено: 24.12.15 12:40. Заголовок: nick_mi пишет: Ну и..
nick_mi пишет: цитата: | Ну или как вариант через DBF ? |
| Именно про структуры не скажу. А как альтернатива DBF можно использовать hash массивы или ARRAYRDD ( SQLMIX, MEMIO )
|
|
|
|
| |
Пост N: 5422
Зарегистрирован: 17.05.05
|
|
Отправлено: 24.12.15 13:28. Заголовок: Можно пробнуть слямз..
Можно пробнуть слямздить класс TStruct из FW и приспособить для себя.
|
|
|
|
| |
Пост N: 731
Зарегистрирован: 20.02.11
|
|
Отправлено: 24.12.15 13:57. Заголовок: Dima пишет: Можно п..
Dima пишет: цитата: | Можно пробнуть слямздить класс TStruct из FW и приспособить для себя. |
| с классами идея хороша , но лямзить не надо #include "hbclass.ch" Func Test() local oB := TestClass():New() oB:cStr := "Test string" // эта переменная определена в классе oB:nNum := 999 // эта переменная определена в классе __objAddData( oB, 'xValue' ) // эта переменная НЕ определена в классе добавим динамически oB:xValue := .T. ? ? oB:cStr, oB:nNum, oB:xValue return nil CLASS TestClass DATA cStr INIT "" DATA nNum INIT 0 ENDCLASS METHOD New() CLASS TestClass ::cStr = "" ::nNum := 0 return Self
|
|
|
|