Программирование на Атлантисе (VIP, FCOM, ARD), FastReport
Модераторы: m0p3e , edward_K , Модераторы
Alexx
Постоянный обитатель
Сообщения: 168 Зарегистрирован: 29 мар 2005, 17:49
Сообщение
Alexx » 27 мар 2009, 16:03
День добрый!
Подкиньте примерчик интерфейса, который не отображает на экране какие-либо элементы управления. Идея такова, интерфейсу передаются какие-то параметры, используя их он сам что-то там делает, в зависимости от задачи, т.е. пользователь ничего там не должен выбирать или нажимать.
Darikon
Постоянный обитатель
Сообщения: 188 Зарегистрирован: 17 июн 2008, 17:07
Откуда: Москва
Контактная информация:
Сообщение
Darikon » 27 мар 2009, 16:23
поищи по форуму AlwaysReturn
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5188 Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb
Сообщение
edward_K » 27 мар 2009, 17:10
и в cmInit в конце
closeinterface(cmDefault)
не поможет добавте еще abort или (и) exit
m0p3e
Местный житель
Сообщения: 1386 Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва
Сообщение
m0p3e » 27 мар 2009, 17:56
Если нужно вернуть что-то, то в заголовке AlwaysReturn.
В конце cmInit ставим Abort
cmInit : {
..........
Abort;
};
При CloseInterface() интерфейс успевает моргнуть вроде.
galover
Местный житель
Сообщения: 794 Зарегистрирован: 16 ноя 2007, 13:52
Сообщение
galover » 30 мар 2009, 10:56
Код: Выделить всё
interface Calc;
public function Mul(param1 : integer; param2 : integer) : integer;
{
result := param1 * param2;
}
end.
interface Test;
handleEvent
cmInit:
{
var pCalc : Calc new;
Message(String(pCalc.Mul(2, 3)));
}
end;
end.