Dag,
Эх, этож сколько ж проектов заглохло только потому, что они объявлялись велосипедами... (я не про свои проекты, в общем)
В HTMLayout, как мне кажется, упор делается на манипуляции с DOM-элементами (и стилями CSS).
Меню, панели, блоки и т.д.- стандартные блоки - Которые надо предварительно разместить в HTML-файле.
Управление - WTL/MFC/Win32 C#, .NET
----------------
В m4gi - создается html-страница (а еще лучше - сразу offline-минисайт, какими инструментами - не скажу, а то будет уже самореклама ), а потом в гиперссылках (<a href="">) задается реакция, код которой (обычный код Visual FoxPro) можно разместить непосредственно в HTML-странице.
Простейший пример - в ссылке задаются значения public-переменным:
<a href="<action>
_m4gi_type_app='2x2'
_m4gi_type_lg=1
</action>">Присвоить значения переменным 'по умолчанию'</a>
После обработки клика по данной ссылке, текущая страница будет переформирована с уже с новыми значениями (соответственно, ее вид может из-за этого кардинально измениться).
В примере, m4gi_start.html, задание значения переменной _m4gi_type определяет вид окна - авторизация или добавление нового пользователя.
В m4gi - большая гибкость. Одно то, что применяется код FoxPro (без компиляций, сборок и т.д., т.е. на лету), считаю огромным плюсом (скорее, это плюс самого foxpro :) . FoxPro forever ).
Для примера работы "велосипеда":
Код страницы авторизации (не используются стили - пример СПЕЦИАЛЬНО создавался на голом HTML).
автор<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "
http://www.w3c.org/TR/1999/REC-html401-19991224/loose.dtd">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=windows-1251">
<title>Страница Интерфейса</title>
<META HTTP-EQUIV="Keywords" CONTENT="Генератор Интерфейса">
<META name="Author" content="Igor Croschin">
<META name=keywords content="">
<META name=description content="maple4.ru">
<script type="text/javascript">
var htmlapp = null;
</script>
<!--m4giproperties <load>
* данный код срабатывает перед формированием страницы
* обычно тут размещается код, результат которого требуется для построения страницы:
* открытие/создание таблиц, инициализация данных и т.д.
this_form.caption="Кто тут?" && задание заголовка формы
IF VARTYPE(_m4gi_name)<>"C" && переменная - имя пользователя
PUBLIC _m4gi_name
_m4gi_name="" && ""-никто не выбран, иначе - будет проставлено в поле имени
ENDIF
IF VARTYPE(_m4gi_type)<>"N" && авторизация или добавление
PUBLIC _m4gi_type
_m4gi_type=0 && 0-предполагается авторизация; 1-предполагается добавление
ENDIF
if not used("_m4gi_korzina") && таблица корзины
select 0
create cursor _m4gi_korzina (id_ n(15),name_ c(50),id_predmet n(15))
endif
if not used("_m4gi_magazin") && таблица товаров магазина
local ims
ims = m4gi_file_path_default("\_m4gi_magazin.dbf")
if m4gi_file(ims)
select 0
use (ims)
else
select 0
create table (ims) (id_predmet n(15),kratkoe c(200), polnoe m, cena n(15), img_ c(200))
use (ims)
endif
endif
if not used("_m4gi_trofei") && таблица принадлежащих пользователю товаров
ims = m4gi_file_path_default("\_m4gi_trofei.dbf")
if m4gi_file(ims)
select 0
use (ims)
else
select 0
create table (ims) (id_ n(15),id_predmet n(15),date_ t)
use (ims)
endif
endif
select * from _m4gi_magazin into cursor _m4gi_magazin_temp order by cena
IF USED("_m4gi_names")
SELECT _m4gi_names
USE
ENDIF
IF m4gi_file_default("_m4gi_names.dbf") && таблица пользователей
SELECT 0
USE (m4gi_file_path_default("_m4gi_names.dbf"))
ELSE
SELECT 0
CREATE TABLE m4gi_file_path_default("_m4gi_names.dbf") (id_ N(15), name_ c(50), pwd_ c(20), money_ n(15))
ENDIF
</load>
<init>
* данный код срабатывает ПОСЛЕ формирования страницы
* здесь удобно объявлять таймеры или обновлять страницу с помощью innerHTML
THIS_FORM.AddObject("_timer1","cmoitimer")
local stro
TEXT TO stro TEXTMERGE NOSHOW
if left(this_form.caption,3)=="Кто" && срабатывание только на этой форме
local jj,zz
jj=ttoc(datetime())
this_form.caption="Кто тут? ("+jj+")"
m4gi_set_inner(this_form,"timestr",jj) && установка значения по id=timestr
else
this_form._timer1.enabled=.f. && таймер работает только при .t.
endif
ENDTEXT
this_form._timer1.textproc=stro
this_form._timer1.post=post
this_form._timer1.this_form=this_form
this_form._timer1.interval=100
</init>
-->
</HEAD>
<body oncontextmenu="return false">
<br>
<SCRIPT LANGUAGE="JavaScript" SRC="fly.js">
</script>
<p align=right>Текущие Дата/время: <b id="timestr"><fp>&datetime()</fp></b></p>
<br>
<form name="main_form" id="main_form_id1" method="post" action="<action>return m4gi_exec('/prg_m4gi_avtoriz.prg',post,this_form)</action>" onsubmit="return false;">
<fp>
LOCAL stro
stro=""
DO CASE
CASE _m4gi_type=0 && в зависимости от значения, будет сформирована форма авторизации или добавления
TEXT TO stro TEXTMERGE NOSHOW
Необходимо авторизоваться (что-бы понять, а кто, собственно, здесь находится).<br><br>
<br>Введите имя: <input type="text" name="text_name" id="text_id1" value="<<_m4gi_name>>" />
<br>Введите пароль: <input type="password" name="text_pwd" id="text_id2" value="" />
ENDTEXT
CASE _m4gi_type=1
TEXT TO stro TEXTMERGE NOSHOW
Добавление нового пользователя.<br><br>
<br>Введите имя: <input type="text" name="text_name" id="text_id3" value="<<_m4gi_name>>" />
<br>Отнеситесь к этому внимательно! Восстановление пароля "невозможно"!<br><br>Введите пароль: <input type="password" name="text_pwd1" id="text_id4" value="" />
<br>Введите пароль еще раз (для проверки): <input type="password" name="text_pwd2" id="text_id5" value="" />
ENDTEXT
ENDCASE
return stro
</fp>
</form>
<input type="button" value="<fp>&iif(_m4gi_type=0,"Войти","Добавить и войти")</fp>" onclick="document.forms['main_form'].submit();">
<fp>&iif(_m4gi_type=0,[<p align=right><i><font size=-1><a href="<action>_m4gi_type=1{{_m4gi_name=''</action>">Перейти к добавлению нового пользователя</a></font></i></p>],;
[<p align=right><i><font size=-2><br><br><a href="<action>_m4gi_type=0{{_m4gi_name=''</action>">Отказаться от добавления нового пользователя</a></font></i></p>])</fp>
<br>
<a onclick="<scriptaction>
wait window "Добрый день! Сегодня "+dtoc(datetime()) nowait
</scriptaction>" href="javascript:void(0)">Кликните! Пример вывода в окне Wait приветствия с текущей датой</a>
</body>
</html>
