//открываем поток ввода в уже созданное окно id.document...
id.document.write("<CENTER>Открыли окно во второй раз"); } if(a==3) { id.focus(); //передаем фокус, затем выполняем те же действия...
id.document.write("<CENTER>Открыли окно в третий раз"); } id.document.write("<FORM><INPUT TYPE=button onClick=window.close(); VALUE=Закрыть окно></CENTER>"); id.document.close(); } Поскольку мы пишем содержание нового окна из окна старого (родителя)...
Office Open XML (OOXML, DOCX, проект ISO/IEC IS 29500:2008) -- серия форматов файлов для хранения электронных документов пакетов офисных приложений -- в частности, Microsoft Office. Формат представляет собой zip-архив, содержащий текст в виде XML, графику и другие данные...
Open Plan - разработчик - Welcom Software Technology www.wst.com / представитель в России - A-Project Technologies (в настоящее время - Департамент управления проектами холдинга "Ланит" www.projectmanagement...
Программный продукт Open Plan от компании Welcom Software Technology позиционируется как профессиональная система управления проектами масштаба предприятия и выпускается в 3 версиях: - Enterprise; - Professional; - Desktop...
...
...
if(ball<10) //если тест не пройден { Form3->Label3->Font->Color= clRed; Form3->Label4->Font->Color= clRed; Form3->Label7->Font->Color= clRed; Form3->QOtchet->Insert(); Form3->QOtchet->FieldByName("Date")->AsString=DateToStr(Date()); Form3->QOtchet->FieldByName("Time")->AsString=TimeToStr(Time()); Form3->QOtchet->FieldByName("Res_text")->AsString="Тест...
Form3->SG1->RowCount=2; Form3->SG1->FixedRows=1; Form3->SG1->Cells[0][0]="Тема"; Form3->SG1->Cells[1][0]="Дата"; Form3->SG1->Cells[2][0]="Время"; Form3->SG1->Cells[0][1]=""; Form3->SG1->Cells[1][1]=""; Form3->SG1->Cells[2][1]=""; Form3->QOtchet->Close(); Form3->QOtchet->SQL->Clear(); Form3->QOtchet->SQL->Add("Select * from Otchet where User_ID=...
Form3->QOtchet->First(); if (!Form3->QOtchet->IsEmpty()) { int i=1; while (!Form3->QOtchet->Eof) { TADOQuery *QSelect=new TADOQuery(NULL); QSelect->ConnectionString=Form2->ADOConnection1->ConnectionString; QSelect->SQL->Add("Select * from Tema where Tema_ID= "+Form3->QOtchet->FieldByName("Tema_ID")->AsString); QSelect->Open(); if...
if...
...
...
...