Модель логически упорядоченных процессов
Курсовой проект - Компьютеры, программирование
Другие курсовые по предмету Компьютеры, программирование
>, А.Вудхалл - СПб.: 2006.
.Першиков В. И., Савинков В. М. Толковый словарь по информатике / Рецензенты: канд. физ.-мат. наук А. С. Марков и д-р физ.-мат. наук И. В. Поттосин. - М.: Финансы и статистика, 1991. - 543 с.
.=StructuredComputerOrganization.-.:,1979.-547">Таненбаум Э. С. Многоуровневая организация ЭВМ = Structured Computer Organization. - М.: Мир, 1979. - 547 с
.Иртегов Д. В. Введение в операционные системы. - 2-е изд. - СПб.: БХВ -СПб, 2007.
Приложение
. Основная структура программы.
unit Unit1;
interface, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, ExtCtrls, StdCtrls, ComCtrls, XPMan, SYNCOBJS, Unit2, Unit3;= class(TForm): TPanel;: TButton;: TEdit;: TEdit;: TLabel;: TLabel;: TRichEdit;: TXPManifest;: TOpenDialog;Button2Click(Sender: TObject);Button1Click(Sender: TObject);
{ Private declarations }: Thread1;: Thread2;;: TForm1;: TEvent;
{$R *.dfm}TForm1.Button2Click(Sender: TObject);OpenDialog1.Execute then.Lines.LoadFromFile(OpenDialog1.FileName);;;TForm1.Button1Click(Sender: TObject);:= TEvent.Create(nil, false, true, );:= Thread1.Create(False);:= Thread2.Create(False);;.
. Поток № 1:Unit2;, SYNCOBJS, windows;= class(TThread)
{ Private declarations }Execute; override;;MaskUtils,Unit1, SysUtils;Thread1.Execute;.WaitFor(infinite);(1000);.RichEdit1.Lines.Add(Welcome to Hell!!!);.Edit1.text :=Done;.SetEvent;;.
. Поток № 2:Unit3;, SYNCOBJS, windows;= class(TThread)
{ Private declarations }Execute; override;;unit1, sysUtils;Thread2.Execute;.WaitFor(infinite);(1000);.RichEdit1.Lines.Add(And goodbye!!!);.Edit2.text :=Done;.SetEvent;
end;.