10,000 تومان
  • فروشنده : کاربر

  • کد فایل : 50823
  • فرمت فایل دانلودی : .doc
  • تعداد مشاهده : 6.6k

آخرین فایل ها

- بیشتر -

دانلود تحقیق درمورد سیستم مکانیزه دبیرخانه

دانلود تحقیق درمورد سیستم مکانیزه دبیرخانه

0 6.6k
دانلود تحقیق درمورد سیستم مکانیزه دبیرخانه

با دانلود تحقیق در مورد سیستم مکانیزه دبیرخانه در خدمت شما عزیزان هستیم.این تحقیق سیستم مکانیزه دبیرخانه را با فرمت word و قابل ویرایش و با قیمت بسیار مناسب برای شما قرار دادیم.جهت دانلود تحقیق سیستم مکانیزه دبیرخانه ادامه مطالب را بخوانید.

نام فایل:تحقیق در مورد سیستم مکانیزه دبیرخانه

فرمت فایل:word و قابل ویرایش

تعداد صفحات فایل:47 صفحه

قسمتی از فایل:

این برنامه یک دیتابیس ساده به زبان دلفی با کمک اکسس و دستورات  Sql  می باشد برای این کار ابتدا به برنامه اکسس رفته و یک Tabel  با نام Dabir ایجاد می کنیم که مانند عکس شامل فیلد های زیر می باشد

 


 

Nno : شماره نامه ای که قرار است ثبت شود

Subject : موضوع نامه ای که قرار است ثبت شود

Date  : تاریخی که در آن نامه ثبت شذه

Name  : نام صاحب نامه

File  : آدرس فایلی که نامه ذخیره می شود

جدول را ذخیره می کنیم و به دلفی می رویم :

New project   را انتخاب می کنیم

مطابق شکل ابزار زیر را در صفحه قرار می دهیم

 



 

 

 

 

 

 

 

 

کد این یونیت به صورت زیر می باشد

unit Unit1;

interface

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, Buttons, StdCtrls, Menus;

type

  TForm1 = class(TForm)

    Button1: TButton;

    GroupBox1: TGroupBox;

    Button3: TButton;

    Button4: TButton;

    GroupBox2: TGroupBox;

    Button6: TButton;

    Button2: TButton;

    Button5: TButton;

    Button7: TButton;

    Label1: TLabel;

    Label2: TLabel;

    Label3: TLabel;

    PopupMenu1: TPopupMenu;

    N1: TMenuItem;

    N2: TMenuItem;

    ColorDialog1: TColorDialog;

    FontDialog1: TFontDialog;

    Label4: TLabel;

    Label5: TLabel;

    procedure Button1Click(Sender: TObject);

    procedure Button3Click(Sender: TObject);

    procedure Button4Click(Sender: TObject);

    procedure Button5Click(Sender: TObject);

    procedure Button6Click(Sender: TObject);

    procedure Button2Click(Sender: TObject);

    procedure N1Click(Sender: TObject);

    procedure N2Click(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

var

  Form1: TForm1;

implementation

uses Unit2, Unit3, Unit5, editor, Unit7, Unit4;

10,000 تومان