Delphida muammo!!!

[Ustoz]

Bunday narsalarni tushunishim qiyin, ammo bir qilib ko`ray-chi, keyin habar qilarman. Omonning maslahati menga juda ham katta foyda berdi, endi keyingi dasturlarimda shuni ishlatmoqchiman, yana boshqa takliflar bo`lsa yaxshi bo`lardi, ammo mening dasturchi emasligimni unutmanglar. iltimos. Soddaroq qilib tushuntirsanglar menga o`xshaganlarning anchasiga foyda bo`lardi. Malahatlar uchun rahmat.
Menda bitta ilgari ham hal qilolmagan muammom bor. Masalan: bitta oynada bir topshiriq chiqdi va bahosini eslab qoldi, keyin boshqa oynada boshqa dastur va uning ham bahosi va yana Nta dasturning o`rtacha bahosi. Shuni hotirada saqlab hisoblaydigan qiluvdim, o`zim ham komp ham yanglishib qolib qotib qolaverardi, shuning osonroq yo`li bormi, faqat tashqi fayldan foydalanmasdan, hotiraning o`zida.

[OmoN]

Сообщение от Ustoz

Menda bitta ilgari ham hal qilolmagan muammom bor. Masalan: bitta oynada bir topshiriq chiqdi va bahosini eslab qoldi, keyin boshqa oynada boshqa dastur va uning ham bahosi va yana Nta dasturning o`rtacha bahosi. Shuni hotirada saqlab hisoblaydigan qiluvdim, o`zim ham komp ham yanglishib qolib qotib qolaverardi, shuning osonroq yo`li bormi, faqat tashqi fayldan foydalanmasdan, hotiraning o`zida.

Агар саволингизни тўғри тушунган бўлсам глобал ўзгарувчига ёзиб қўйинг.

[Hero]

Караоке прогмасси керак эди.

[OmoN]

Сообщение от Baron

O'sha dialogs.pas faylni keraklicha o'zgartirib, undan dcu - modul faylini olish kerak ekan. Yoki dcu fayllar turadigan joydan dialogs.dcu ni o'zgartirib qo'yib, keyin kompilyatsiya qilsa, o'sha yerda yangi, o'zgartirilgan dialogs.dcu hosil bo'ladi. Keyinchalik ham undan foydalanish mumkin.
O'z modulni yozishga kelsak, bu ham yaxshi. Menimcha, dialogs.pas ni o'zgartirib, "an'anaviy" MessageDlg ni argumentlarini ham o'zgartirib qo'ysa bo'ladi. Kerakli til uchun ham argument qo'shib. Bu ham modul hisoblanadi.

Агар программа бир нечта тилда ишлаши керак бўлсачи? Ёки кейинги программанинг интерфейси русча бўлиши керак бўлса. Ўша файлни яна қайта перекомпиляция қиласизми?

Сообщение от Hero

Караоке прогмасси керак эди.

Дельфидами?

[Hero]

Сообщение от OmoN

Агар программа бир нечта тилда ишлаши керак бўлсачи? Ёки кейинги программанинг интерфейси русча бўлиши керак бўлса. Ўша файлни яна қайта перекомпиляция қиласизми?

Дельфидами?

Ha

[OmoN]

Сообщение от Hero

Ha

Дельфида .midi файллар билан ишлаш ҳақида ўқиб кўринг. Бирон нима чиқиб қолар. .kar файллар билан қандай ишланади билмадим. Лекин мидилар билан ишлаш сал осонроқ (менимча). Яна битта йўли: медиаплеер ясайсизда, қўшиқнинг матнини бегущая строкага ўхшаб ўтказиб турасиз. Лекин бунда тезликни настройка қилиш проблема бўлади.

[Hero]

[/QUOTE]Дельфида .midi файллар билан ишлаш ҳақида ўқиб кўринг. Бирон нима чиқиб қолар. .kar файллар билан қандай ишланади билмадим. Лекин мидилар билан ишлаш сал осонроқ (менимча). Яна битта йўли: медиаплеер ясайсизда, қўшиқнинг матнини бегущая строкага ўхшаб ўтказиб турасиз. Лекин бунда тезликни настройка қилиш проблема бўлади.[/QUOTE]

Рахмат ака харакат қилиб кўрайчи

[Baron]

OmoN, ko'p tilli dastur qilib ko'rmaganman. Menimcha, ko'p tilli bo'lsa dialogs.pas ni ichida MessageDlg ni funksiyasiyam bo'ladiku, shuni o'zgartirish kerak degandim. Til uchun bitta atribut qo'shiladi, shunga qarab funksiyani ichida kerakli tilda qiymat oladi xolos. Masalan, MessageDlg("xabar","sarlavha",mtConfirmation,MbOk, 0,'uzbek'); shaklida degandim.

[OmoN]

Оффтоп:

Сообщение от Baron

OmoN, ko'p tilli dastur qilib ko'rmaganman. Menimcha, ko'p tilli bo'lsa dialogs.pas ni ichida MessageDlg ni funksiyasiyam bo'ladiku, shuni o'zgartirish kerak degandim. Til uchun bitta atribut qo'shiladi, shunga qarab funksiyani ichida kerakli tilda qiymat oladi xolos. Masalan, MessageDlg("xabar","sarlavha",mtConfirmation,MbOk, 0,'uzbek'); shaklida degandim.

Кўп тилли дастурларда энг яхшиси кэпшинларни базага ёки ини файлга ёзиб қўйиш. Хабар чиқариш учун эса алоҳида форма яратган маъқул. Булар албатта менинг шахсий фикрларим.

Устоз, программага Сиз айтган қулайликларни қўшишни бошладим. Насиб қилса(чақалоқ рухсат берса ) бирор кун тугатарман.

[MAK]

Сообщение от Ustoz

Ilgari o`zim ozgina bol`sa ham tushunardim, hozir esa yetti yil bo`ldi, faqat matnni o`zgartirib dasturni yangilab o`tiraman. Mana ko`d:
procedure TDars_Form.FormShow(Sender: TObject);
begin
soz:='45';
{---------- 1 Dars --------}
Uzb[1,1]:='yutuq, muvaffaqiyat, g`alaba'; Eng[1,1]:='achievement';
Uzb[1,2]:='hayratlanarli, qoyilmaqom, ajoyib'; Eng[1,2]:='amazing';
Uzb[1,3]:='qadimgi, qadimiy, ko`hna'; Eng[1,3]:='ancient';
........
Dars_Max[1]:=100;
{---------- 2 Dars --------}
Uzb[2,1]:='1) hisobchi; 2) (yuridk) javobgar'; Eng[2,1]:='accountant';
Uzb[2,2]:='aerobika'; Eng[2,2]:='aerobics';
Uzb[2,3]:='ta`sirini o`tkazmoq, mug`ombirlik qilmoq';
.....
Dars_Max[2]:=126;
..... va hakazo
i:=1;
tj:=0;
Label3.Caption:=IntToStr(i)+'.';
label1.caption:=Uzb[Dars,i];
edit1.text:='';
end;

Mana shu va hakazosi ko`payib ketdi. Shu sababli hotira yetmayapti. Hurmatli Omon, agar iloji bo`lsa mummoni shunda hal qilsak-de, keyingi dasturlarimga boshqa ilojini topsak, yaxshi bo`lardi, chunki men buni bitirib olishim kerak. Bu tipdagi dasturlarim juda ko`p, boshida qilinayotganda albatta bunday kattalashib ketishi hech kimning hayoliga ham kelmagan, agar BD bilan ishlashning iloji bo`lsa o`zim ham yo`q demasdim, ammo BD bilan alohida ishlaymanu, Delphi bilan kelishtirolmayman.

Dasturni proceduralarga bo'lib tashlash kerak. Ya'ni, har bir prosedurada, masalan, 25 ta savol va javoblar beriladi.
Gap shundaki har bir prosedura o'z ishini yakunlagach hotirani bo'shatib chiqib ketadi.
Delphidan tashqarida turib dasturni kompilyatsiya qilish imkoni yo'q.

P.S. Bo'lib tashla va hukmronlik qil!