Arsip: MDI
more 13 years ago
desidian
selamat sore para master delphi ...
mau tanya nih, saya buat form mdi dan child ..
sebelum mdinya muncul saya munculkan form login, kemudian mdi dan setelah mdi maka childnya
pada project optionnya saya ubah main formnya menjadi "form login". ketika dirun maka akan eror ketika memanggil chilnya. namun jika main formnya dibuat form mdinya maka ketika run yang awal nongol itu form mdinya dan form loginnya ngga nongol
mohon pencerahannya para master sekalian bagaimana mengatasi hal tersebut /.......terimakasihhh
more 13 years ago
mas_kofa
1. form login jangan kamu set autocreate
2. kamu ubah di file .dpr nya, untuk menampilkan formLogin
contoh :
program g_Resto;
uses
Forms,
ufrmUtama in 'ufrmUtama.pas' {frmUtama},
ufrmKoneksi in '..\myfunctions\DMySQL\ufrmKoneksi.pas' {frmKoneksi},
ShellAPI,
ufrmGantiPassword in '..\myfunctions\DMySQL\ufrmGantiPassword.pas' {frmGantiPassword},
ufrmDetailSales in 'ufrmDetailSales.pas' {frmDetailSales},
ufrmMasterUser in '..\myfunctions\DMySQL\ufrmMasterUser.pas' {frmMasterUser},
ufrmHakAkses in '..\myfunctions\DMySQL\ufrmHakAkses.pas' {frmHakAkses},
ufrmLookUp in '..\myfunctions\DMySQL\ufrmLookUp.pas' {frmLookUp},
myfunction in '..\myfunctions\core\myfunction.pas',
uMyConfigFile in '..\myfunctions\core\uMyConfigFile.pas',
uMyEncrypt in '..\myfunctions\core\uMyEncrypt.pas',
ufrmMessage in '..\myfunctions\core\ufrmMessage.pas' {frmMyMessage},
ufrmMasterPegawai in 'ufrmMasterPegawai.pas' {frmMasterPegawai},
ufrmCatProduct in 'ufrmCatProduct.pas' {frmCatProduct},
ufrmProduct in 'ufrmProduct.pas' {frmProduct},
ufrmCatService in 'ufrmCatService.pas' {frmCatService},
ufrmTypeService in 'ufrmTypeService.pas' {frmTypeService},
ufrmMasterService in 'ufrmMasterService.pas' {frmMasterService},
ufrmIngredient in 'ufrmIngredient.pas' {frmIngredient},
ufrmMasterTenant in 'ufrmMasterTenant.pas' {frmMasterTenant},
ufrmDefaultMaster in '..\myfunctions\DMySQL\ufrmDefaultMaster.pas' {frmDefaultMaster},
ufrmMasterCustomer in 'ufrmMasterCustomer.pas' {frmMasterCustomer},
ufrmPurchaseOrder in 'ufrmPurchaseOrder.pas' {frmPurchaseOrder},
uComponent in 'uComponent.pas',
ufrmExecDTable in '..\myfunctions\DMySQL\ufrmExecDTable.pas' {frmExecDTable},
ufrmLogin in '..\myfunctions\DMySQL\ufrmLogin.pas' {frmLogin},
ufrmReport in '..\myfunctions\DMySQL\ufrmReport.pas' {frmReport},
ufrmManageSales in 'ufrmManageSales.pas' {frmManageSales},
ufrmPenjualan in 'ufrmPenjualan.pas' {frmPenjualan},
ufrmReportSales in 'ufrmReportSales.pas' {frmReportSales},
ufrmGridProduct in 'ufrmGridProduct.pas' {frmGridProduct},
ufrmPindah in 'ufrmPindah.pas' {frmPindah},
ufrmAbout in '..\myfunctions\core\ufrmAbout.pas' {frmAbout},
ufrmSplit in 'ufrmSplit.pas' {frmSplit},
uMD5 in '..\myfunctions\core\uMD5.pas',
ufrmRegister in '..\myfunctions\core\ufrmRegister.pas' {frmRegister},
ufrmCombine in 'ufrmCombine.pas' {frmCombine},
ufrmChangeLog in 'ufrmChangeLog.pas' {frmChangeLog},
uMyClasses in '..\myfunctions\core\uMyClasses.pas',
ufrmMasterSupplier in 'ufrmMasterSupplier.pas' {frmMasterSupplier},
ufrmSetting in 'ufrmSetting.pas' {frmSetting};
{$R
.RES}
begin
Loged := false;
frmLogin := TfrmLogin.Create(nil);
frmLogin.ShowModal;
if not Loged then exit;
LoadIdentitas;
Application.Initialize;
Application.Title := '..:: Desktop POS Resto and Cafe ::..';
Application.CreateForm(TfrmUtama, frmUtama);
Application.CreateForm(TfrmReport, frmReport);
Application.Run;
end.
more 13 years ago
henry_sys
Benar kata mas_kofa, krn saya juga pernah alami seperti yang mas diskusikan skrg
klu dl saya create Login pada Even Onshow Pada MDIForm dan FmLogin tdk auto Create
bisa juga diubah dari *.dpr atau bisa jg dari project-> Option->Form kemudian FmLogin Di pindah ke kanan (Available Form)
more 13 years ago
desidian
maksudnya diubahnya dimananya ya ?
maaf sebelumnya saya kurang mengerti...:(
more 13 years ago
luckynvic
buka di project -> view source,
form loginnya di create duluan sebelum application.initialize (contoh dari mas_kofa)
atau bisa juga create mdi form nya duluan kemudian form loginnya tapi setelah form login ditambahkan dengan frm_login.showModal() jadi aplikasi bisa ketahan di form login, kemudian perlu kondisi apakah login atau tidak (seperti contoh dr mas_kofa)
:)
more ...
- Pages:
- 1
reply |
Report Obsolete
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 4 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 4 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 5 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 12 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 12 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 12 years ago
Random Topic
- [request] form master detail ADO-Ms Access
by siLupus in Hal umum tentang Pascal Indonesia more 18 years ago - Software Copy Protection
by andipurwito in Law, CopyRight and CopyLeft more 16 years ago - sub record DBGrid1 terdapat dalam DBGrid2
by yanuar1087 in Hal umum tentang Pascal Indonesia more 12 years ago - MD5 mysql
by elektra_3328 in MySQL more 13 years ago - Operasi aritmatik pada Edit untuk Form Penjualan...
by ii_irwan in Lain-lain more 15 years ago - saran neh...
by p2bf in Kritik & Saran more 17 years ago - Fast Report dan MySql ?
by armanefendi in MySQL more 17 years ago - baca excel sebagai table.
by Starboard in Tip n Trik Pemrograman more 19 years ago - Always Maximize
by 3m8ooo in Hal umum tentang Pascal Indonesia more 15 years ago - report cuma bisa nongol 1x..puciii..ng
by asiyrob in MySQL more 17 years ago