Сервисы поддержки / Примеры / Библиотеки разработчика / TabObj.d32 объект таблица, с макросом примером и исходниками

TabObj.d32 объект таблица, с макросом примером и исходниками

Автор:kotbegemot
Дата:02.02.2006
Просмотров:3826
Скачиваний:964
Оценка: - , Оценок - 0

Скачать (rar-файл; Размер - 49667)

Обсудить в форуме

Описание

DLM модуль TabObj.d32.
Служит для того чтобы создать форму с таблицей и обработать события с клавиатуры. Другими словами это компанент таблица.
Которая заполняется простыми значениями и имеет свой описатель.

Текст примера

 /*-----------------------------------------------------------------/* Author:Chernickevich K.K.
 www:www.angelfire.com/rpg2/e_grig
 mail:layertran@mail.ru
*/
import "TabObj.d32";
              
MyIndex = CreateObjTable();     
SetRowsCollsTable(MyIndex,5,4,16);   

AddTableColSize(MyIndex,9);
AddTableColSize(MyIndex,8);
AddTableColSize(MyIndex,10);

SetTablePosition(MyIndex,5,10);
i = 0;
while(i<100)
AddStringToTable(MyIndex,0,"TESTA:"+String(i));  
AddStringToTable(MyIndex,1,"TESTB"+String(i));         
AddStringToTable(MyIndex,2,"TESTC"+String(i));
AddStringToTable(MyIndex,3,"TESTD"+String(i));
i = i +1;
end;

ShowTable(MyIndex);    
WaitKbdTable(MyIndex);

UnlinkTableObject(MyIndex);