Procedure TForm1.Button1Click(Sender: TObject); begin If FontDialog.Execute then RichEdit1.SelAttributes.Assign(FontDialog1.Font); RichEdit1.SetFocus; End; end;
делфи у меня не установлены за совершенной ненадобностью, потому проверить возможности нет, но догадки показать могу. Не уверенна что RichEdit1.SelAttributes.Assign(FontDialog1.Font) выставляет шрифт, может там нужна кострукция типа RichEdit1.SelAttributes.Font := FontDialog1.Font и конечно описка выделенная ранее, как на нее только компилятор не матерится
В середине века выдающийся американский учёный Норберт Винер (1894−1964) , изучавший различные технические и биологические системы, установил, что управление в них осуществляется по общей схеме. Винер считается основоположником науки об управлении — кибернетики.
Существует большое количество различных определений понятия «кибернетика», однако все они сводятся к тому, что кибернетика — это наука, изучающая общие закономерности строения сложных систем управления и протекания в них процессов управления. Так как любые процессы управления связаны с принятием решений на основе получаемой информации, то кибернетику часто определяют ещё и как науку об общих законах получения, хранения, передачи и преобразования информации в сложных управляющих системах.
begin
If FontDialog.Execute then
RichEdit1.SelAttributes.Assign(FontDialog1.Font);
RichEdit1.SetFocus;
End;
end;
делфи у меня не установлены за совершенной ненадобностью, потому проверить возможности нет, но догадки показать могу.
Не уверенна что RichEdit1.SelAttributes.Assign(FontDialog1.Font) выставляет шрифт, может там нужна кострукция типа
RichEdit1.SelAttributes.Font := FontDialog1.Font
и конечно описка выделенная ранее, как на нее только компилятор не матерится
Кибернетика
Объяснение:
В середине века выдающийся американский учёный Норберт Винер (1894−1964) , изучавший различные технические и биологические системы, установил, что управление в них осуществляется по общей схеме. Винер считается основоположником науки об управлении — кибернетики.
Существует большое количество различных определений понятия «кибернетика», однако все они сводятся к тому, что кибернетика — это наука, изучающая общие закономерности строения сложных систем управления и протекания в них процессов управления. Так как любые процессы управления связаны с принятием решений на основе получаемой информации, то кибернетику часто определяют ещё и как науку об общих законах получения, хранения, передачи и преобразования информации в сложных управляющих системах.