Руководство пользователя системы sigma «Исследование напряженно-деформированного состояния плоского объекта» - davaiknam.ru o_O
Главная
Поиск по ключевым словам:
Похожие работы
Название работы Кол-во страниц Размер
Исследование напряжённо-деформированного состояния. Предположим,... 1 8.88kb.
Прикладная механика 1 25.47kb.
Литература ко второй части 1 252.26kb.
Цветной картплоттер с датчиками Руководство пользователя -i 9 1104.01kb.
Реологические свойства грунтов и их учет 6 398.55kb.
Руководство пользователя Содержание Общие положения 1 Требования... 1 75.69kb.
Руководство пользователя Май 1994 Версия 50 beta 1 294.21kb.
Руководство пользователя электронного сервиса смэв 6 715.45kb.
Руководство пользователя электронного сервиса смэв 5 546.45kb.
Теория пластичности 1 27.51kb.
Руководство пользователя Стандартные функции системы 4 518.98kb.
Проведение научно-исследовательских и опытно-конструкторских работ... 3 642.96kb.
Направления изучения представлений о справедливости 1 202.17kb.

Руководство пользователя системы sigma «Исследование напряженно-деформированного - страница №5/5

Список программного обеспечения и систем


  1. Microsoft® Windows 95
    Copyright © 1981-1995 Microsoft Corp.

  2. Microsoft® Word 97
    © Корпорация Microsoft, 1983-1997

  3. Borland Delphi Enterprise Version 5.0 (Build 5.62)
    Copyright 1983-1999 Inprise Corporation

  4. InstallShield Express Delphi Edition for Borland Delphi 3.0 Version 1.11
    Copyright 1997 Stiring Technologies

  5. Borland Image Editor Version 3.0
    Copyright © 1997 Borland International

  6. Microsoft Paint Windows 95
    Copyright © 1981-1995 Microsoft Corp.

  7. Microsoft Notepad Windows 95
    Copyright © 1981-1995 Microsoft Corp.

  8. HelpScribble 1.4.0
    Copyright © 1996,1997 by Jan Goyvaerts

  9. RAR for Windows Version 2.02
    Copyright © 1993-1997 by Eugene Roshal

  10. The Norton Commander Version 5.0
    Copyright © 1986-1995 by Symantec Corporation

Список литературы


  1. Автоматизированное проектирование силовых конструкций
    А. В. Соловов, В. А. Столярчук, Учебное пособие, МАИ, Москва, 1993

  2. Подсистема проектирования ферменных конструкций учебной САПР ПРОСК
    В. А. Комаров, А. В. Соловов, КАИ, Куйбышев, 1985

  3. Разработка обучающих подсистем САПР
    А. В. Бродский, В. А. Столярчук, С. А. Ульянов, Учебное пособие, МАИ, Москва, 1990

  4. Метод конечных элементов в расчетах прочности
    К. П. Горбачев, Ленинград, "Судостроение", 1985

  5. Метод конечных элементов TPSIO
    Руководство пользователя

  6. Автоматизация проектирования авиационных конструкций
    Межвузовский сборник, Куйбышев, 1979

  7. Метод конечных элементов. Основы
    Р. Галлагер, Москва, "МИР", 1984

  8. Метод конечных элементов и САПР
    Ж.-К. Сабоннадьер, Ж.-Л. Кулон, "МИР", 1989

  9. Метод конечных элементов в технике
    О. Зенкевич, Москва, "МИР", 1975

  10. Введение в оптимизацию конструкций
    Баничук Н.В., Москва, "Наука", 1986

  11. Методы оптимизации
    Е. А. Хвилон, Курс лекций, МАИ, Москва, 1976

  12. Разработка САПР. Проблемы и принципы создания САПР. 1 книга
    А. В. Петров, В. М. Черненький, Москва, "Высшая школа", 1990

  13. Разработка САПР. Графические системы САПР. 7 книга
    В. Е. Климов, Москва, "Высшая школа", 1990

  14. Разработка САПР. Лабораторный практикум на базе учебно-исследовательской САПР. 10 книга
    А. В. Петров, Москва, "Высшая школа", 1991

  15. Методические указания к организационно-экономической части дипломных проектов и работ (для дневной формы обучения)
    В. Л. Горелова, Д. Г. Кузнецова, МАИ, Москва, 1986

  16. Windows 95 изнутри
    Адриан Кинг, "Питер", 1995

  17. Программирование в среде Турбо Паскаль. Версия 5.5
    Д. Б. Поляков, И. Ю. Круглов, Москва, МАИ, А/O "РОСВУЗНАУКА", 1992

  18. Языки программирования Ада, Си, Паскаль. Сравнение и оценка.
    Под. Ред. Фьюэра А. и Джехани Н., Москва, "Радио и Связь", 1989

  19. Использование Delphi™ 3. Специальное издание
    Тодд Миллер, Дэвид Пауэл, Киев-Москва, "Диалектика", 1997

  20. Операционная система Windows 95 для программистов
    А. В. Фролов, Г. В. Фролов, Москва, "Диалог-МИФИ", 1996

  21. Аналитическая геометрия
    И. И. Привалов, Москва, "Наука", 1964

Приложение.

Главный модуль

Взаимодействие с проектом


Type

TProjectClass = Class

private

FProjectPath : string;



ProjectName : string;

fModified : boolean;

fFormFile : String;

procedure SetFormFile(Value:String);

procedure SetProjectPath(Value:String);

public


ProgramFiles : TStringList;

Error : word;

Source : string;

IniFile : string;

property FormFile : String read fFormFile write SetFormFile;

property ProjectPath: string read FProjectPath write SetProjectPath;

property Modified : boolean read fModified;

constructor Create;

function PackFileName(FileName:string):String;

function UnPackFileName(FileName:string):String;

procedure New;

Procedure Save(FileName:string);

Procedure Load(FileName:string);

Destructor Destroy;override;

procedure ListChange(Sender: TObject);

procedure AddFile(FileName:string;OldProject:boolean);

End;

MyString=PChar;



procedure Project_New;stdcall;

procedure Project_Open(filename:MyString);stdcall;

procedure Project_Save(filename:MyString);stdcall;

function Project_PackFileName(filename:MyString):MyString;stdcall;

function Project_UnPackFileName(filename:MyString):MyString;stdcall;

function Project_IsModified:boolean;stdcall;

function Project_Error:word;stdcall;

procedure Project_SetSource(PathStr:MyString);stdcall;

function Project_GetSource:MyString;stdcall;

procedure Project_SetFormFile(filename:MyString);stdcall;

function Project_GetFormFile:MyString;stdcall;

procedure Project_Fortran_Add(filename:MyString);stdcall;

procedure Project_Fortran_Del(filename:MyString);stdcall;

function Project_Fortran_Count:word;stdcall;

procedure Project_Fortran_Set(Index:word;filename:MyString);stdcall;

function Project_Fortran_Get(Index:word):MyString;stdcall;

procedure Project_Fortran_Clear;stdcall;

procedure Project_NotModified;

exports

Project_New, Project_Open, Project_Save, Project_PackFileName, Project_UnPackFileName, Project_IsModified, Project_Error, Project_SetSource, Project_SetSource, Project_SetFormFile, Project_GetFormFile, Project_Fortran_Add, Project_Fortran_Del, Project_Fortran_Count, Project_Fortran_Set, Project_Fortran_Get, Project_Fortran_Clear;


Взаимодействие с комплексом


Procedure CheckState;stdcall;

function GetPlugin(PluginType:integer):HModule;stdcall;

function RegisterImage(Plugin:HModule; Name:PChar; Color:TColor):Integer; stdcall;

function RegisterMenu(Plugin:HModule; Caption:PChar; BitMap, main:integer; OnClick:PChar):TObject;stdcall;

procedure SetToolButtonStatus(Button:TObject;Enable:boolean);stdcall;

procedure SetMenuStatus(menu:TObject;Enable:boolean);stdcall;

procedure RegisterPlugin(Plugin:HModule;PluginType:integer);stdcall;

exports


RegisterImage, RegisterMenu, RegisterToolButton, RegisterPlugin, GetPlugin, CheckState, SetToolButtonStatus, SetMenuStatus;

Внешние функции плагинов


function Can_Close:boolean;stdcall;

function GetPluginName:PChar;stdcall;

procedure «ShowForm»;stdcall;

procedure FinalizeDLL;stdcall;

procedure CheckState;stdcall;

procedure InitializeDLL(Plugin:HModule;Handle:THandle);stdcall;

Exports

InitializeDLL, FinalizeDLL, ShowForm, GetPluginName, Can_Close, CheckState;


Модуль редактирования формы


type

MyReal=real;

TMainParams=Record

TaskType : byte;

Variant : byte;

NRC : Word;

DB : MyReal;

DH : MyReal;

DR : MyReal;

DD : MyReal;

RSUMX : MyReal;

RSUMY : MyReal;

CountStress : integer;

CountFree : integer;

CountElements : integer;

CountMaterial : integer;

E : MyReal;

Mju : MyReal;

SB : MyReal;

L : MyReal;

INRG : integer;

INBP : integer;

End;

TNode=Record



Number : word;

x,y : MyReal;

End;

TArea=Record



maxx : MyReal;

maxy : MyReal;

minx : MyReal;

miny : MyReal;

End;

TZone = Array Of word;



TMainParamsClass = Class

private


FMainParams : TMainParams;

Procedure SetMainParams(Value:TMainParams);

Function GetMainParams:TMainParams;

public


FZonesClass : TObject;

Property MainParams:TMainParams read GetMainParams write SetMainParams;

Procedure New;

Procedure Load(var Handle:File);

Procedure Save(var Handle:File);

End;


TNodesClass = Class

private


FNodes : Array Of TNode;

FArea : TArea;

MaxNum : word;

Procedure SetNode(Index: Integer;Value:TNode);

Function GetNode(Index: Integer):TNode;

Procedure CheckArea;

public

FZonesClass : TObject;



Constructor Create;

Function AddNode(x,y:MyReal):word;

Function DeleteNode(Number:word):boolean;

procedure Clear;

Property Area:TArea read FArea;

Function CountOfNodes : word;

Property Nodes[Index: Integer]:TNode read GetNode write SetNode;

Function FindNode(x,y,Epsilon:MyReal):TNode;

Function FindIndex(Number:word):integer;

procedure Save(var Handle:File);

procedure Load(var Handle:File;CountNodes:word);

Destructor Destroy;override;

End;

TZonesClass = Class



private

FModified : boolean;

CurrentZone : word;

CurrentNode : word;

FZones : Array of TZone;

FCountOfEdges:word;

procedure SetZone(Zone,Node: Integer;Value:word);

Function GetZone(Zone,Node: Integer):word;

procedure SetCountOfEdges(Value:word);

public


CountOfNodesInZone: word;

MainParamsClass : TMainParamsClass;

FNodesClass : TNodesClass;

Error : integer;

Constructor Create;

property CountOfEdges:word read FCountOfEdges write SetCountOfEdges;

Function CountOfZones : word;

Property Zones[Zone,Node: Integer]:word read GetZone write SetZone;

Property Modified:boolean read FModified;

Function PushNode(x,y:MyReal):boolean;

procedure PopNode;

procedure DelAllZones;

Procedure AddZone;

function Finished:boolean;

Procedure RemoveZone;

Procedure Clear;

Procedure OnLoad(var Handle:file);

Procedure Load(FileName:string);

Procedure OnSave(FileName:string);

Procedure Save(FileName:string);

Destructor Destroy;override;

End;


procedure SetMainParam(MainParams:TMainParams);stdcall;

function GetMainParam:TMainParams;stdcall;

function Form_CountOfNodesInZone:word;stdcall;

function Form_IsModified:Boolean;stdcall;

function Form_GetNodeNumber(Zone,Node:word):word;stdcall;

function Form_FindNode(x,y,Epsilon:MyReal):TNode;stdcall;

function Form_GetNodeValue(Number:word):TNode;stdcall;

procedure Form_SetNodeValue(Number:word;x,y:MyReal);stdcall;

function Form_GetArea:TArea;stdcall;

function Form_PushNode(x,y:MyReal):boolean;stdcall;

procedure Form_PopNode;stdcall;

procedure Form_AddZone;stdcall;

function Form_ZoneFinished:boolean;stdcall;

procedure Form_RemoveLastZone;stdcall;

procedure Form_Clear;stdcall;

procedure Form_Load(FileName:PChar);stdcall;

procedure Form_Save(FileName:PChar);stdcall;

function Form_Modified:boolean;stdcall;

Procedure Create_Data_File(FileName: PChar);stdcall;

Procedure Create_Fortran_Form(FileName:PChar);stdcall;

exports

SetMainParam, GetMainParam, Form_CountOfNodesInZone, Form_IsModified, Form_GetNodeNumber, Form_FindNode, Form_GetNodeValue, Form_SetNodeValue, Form_GetArea, Form_PushNode, Form_PopNode, Form_AddZone, Form_ZoneFinished, Form_RemoveLastZone, Form_Clear, Form_Load, Form_Save, Form_Modified, Create_Data_File, Create_Fortran_Form;


Классы чтения файла отчета расчета.


Type

MyReal=real;

TOneNode = Record

Number : integer;

x,y : MyReal;

ForceX,ForceY : MyReal;

BondType : byte;

DX,DY : MyReal;

RenumNum : integer;

End;


TOneElement = Record

Number : integer;

Node1,Node2,Node3 : integer;

strain : Array [1..6] Of MyReal;

End;

TArea = Record



maxx,maxy,minx,miny : MyReal;

End;


TNodes = Class

//filename:string;

protected

InputFile : String;

CountOfNodes : integer;

ArrayOfNodes : Array Of TOneNode;

CurrentNode : word;

public


Area : TArea;

Error : word;

Constructor Create;

Procedure LoadNodes(InputFile:String);

Procedure AddNode(OneNode:TOneNode);

Procedure EditNode(Number:integer;OneNode:TOneNode);

Function FindNode(x,y:MyReal):integer;

Function GetNode(n:integer):TOneNode;

Function GetMovedNode(n:integer;Move:MyReal):TOneNode;

Function FindRenumNode(n:integer):integer;

Procedure UpDateWithMove(Move:MyReal);

Function SetFirstElement:boolean;

Function SetNextElement:boolean;

Function GetCurrentElement:word;

End;

TElements = Class



protected

InputFile : String;

CountOfElements : integer;

ArrayOfElements : Array Of TOneElement;

CurrentElement : word;

public


//filename:string;

Error : word;

Max, Min : Array [1..6] Of MyReal;

Constructor Create;

Procedure LoadElements(InputFile:String);

Procedure AddElement(OneElement:TOneElement);

Procedure EditElement(Number:integer;OneElement:TOneElement);

Function FindElement(n:integer):integer;

Function GetElement(n:integer):TOneElement;

Function SetFirstElement:boolean;

Function SetNextElement:boolean;

Function GetCurrentElement:TOneElement;

Function FindElementByPoint(x,y:MyReal;Move:MyReal):integer;

End;


1 Внешние функции это описанные специальным образом функции доступные из любого исполняемого модуля.

<< предыдущая страница  



При виде девушек сразу чувствовал себя подлецом. Геннадий Малкин
ещё >>