Решил создать блог. Не потому, что теперь это модно. Просто иногда хочется делиться своими опытом и мыслями... а делиться у меня есть чем.
Итак, посмотрим, что из этого получится.
Шаг первый. Поколдовав с HTML, удалось настроить ширину блога (автоматическая ширина под размер окна обозревателя).
Шаг второй. Отдельный домен. Спасибо нашему админу, Тимуру :)
Шаг третий. Поковырявшись в CSS удалось скрыть панель навигации и настроить внешний вид.
Для начала хватит :)
P.S.: с HTML и CSS я на практике не знаком. Однако это не помешало мне проявить упорство и добиться результата без чьей-либо помощи...
Тестовый кусок кода
procedure TApplication.Run; begin FRunning := True; try AddExitProc(DoneApplication); if FMainForm <> nil then begin case CmdShow of SW_SHOWMINNOACTIVE: FMainForm.FWindowState := wsMinimized; SW_SHOWMAXIMIZED: MainForm.WindowState := wsMaximized; end; if FShowMainForm then if FMainForm.FWindowState = wsMinimized then Minimize else FMainForm.Visible := True; repeat try HandleMessage; except HandleException(Self); end; until Terminated; end; finally FRunning := False; end; end;
1 коммент.:
Приветствую. =)
занудный p.s. а кусок кода всё-таки лучше взять из какой-нибудь open source библиотеки. А то ещё юристы в Embarcadero обидятся.. =)
Отправить комментарий