Моё меню Общее меню Сообщество Правила форума Все прочитано
Вернуться   uForum.uz > ИКТ и телеком > IT-индустрия > Софт > Программирование > Pascal, Delphi & Builder
Сообщения за день Поиск
Знаете ли Вы, что ...
...инструкция по установке аватара описана в Правилах форума.
<< Предыдущий совет - Случайный совет - Следующий совет >>

Pascal, Delphi & Builder Вопросы программирования касающиеся Pascal и Delphi


Ответить

 
Опции темы Опции просмотра
Старый 27.05.2011 16:49   #101  
Аватар для MAK
Оффлайн
Kollej
O'qituvchi
Сообщений: 82
+ 32  10/7
– 1  1/1

Uzbekistan
Нима учун ДБГридда ИНСЕРТ босилганда янги ёзув курсордан битта юкорида киритилади ва курсор силжиганда, хозиргина киритган ёзувинг рўйхатнинг энг охирига тушиб кетади? Бу ж-у-у-у-да ноқулай, фойдаланувчи учун. Нахотки, мумкин эмас, соддагина, инсонпарвар усул билан ДБГридга гап уқтиришнинг?!
Агар бу мумкин бўлмаса, у холда нима учун?
Нахотки, Андерс Хейлсберг бунга эътибор бермаган бўлса?
__________________
Провинциальный преподаватель программирования
Ответить 
Старый 27.05.2011 17:35   #102  
uParty Member Known ID Group Ultimate
Аватар для OmoN
Оффлайн
програмщег
Сообщений: 4,971
+ 2,743  5,086/2,116
– 69  99/68

Uzbekistan
Цитата:
Сообщение от MAK Посмотреть сообщение
Нима учун ДБГридда ИНСЕРТ босилганда янги ёзув курсордан битта юкорида киритилади ва курсор силжиганда, хозиргина киритган ёзувинг рўйхатнинг энг охирига тушиб кетади? Бу ж-у-у-у-да ноқулай, фойдаланувчи учун.
гридда инсерт(яъни орасига тиқиш) ўз вазифасини бажаради. фойдаланувчи учун ноқулай нарсани қулай қилиш программистнинг вазифаси.
__________________
Ошибки прошлого, мудрость будущего. (с)Д.Тернер.
Ответить 
Старый 27.05.2011 19:23   #103  
Аватар для MAK
Оффлайн
Kollej
O'qituvchi
Сообщений: 82
+ 32  10/7
– 1  1/1

Uzbekistan
"орасига тиқиш" деганга қўшилмайман. Қандай қилиб файлни "орасини йириб" ёзувни "тиқиб" қўйиш мумкин? Агар шундай бўлганда, юқоридагидек "нозик" сўзлар ва индекслаш деган "бало"ларга хожат қолмаган бўларди.

Менинг фикрим, ёки ниманидир хисобга олмаяпмиз ёки компоненти усталарча алдашимиз керак.

Савол:
а) Нимани хисобга олмаяпмиз?
б) Компонентни қандай алдаш мумкин?
__________________
Провинциальный преподаватель программирования
Ответить 
Старый 27.05.2011 22:21   #104  
uParty Member Known ID Group Ultimate
Аватар для OmoN
Оффлайн
програмщег
Сообщений: 4,971
+ 2,743  5,086/2,116
– 69  99/68

Uzbekistan
Узр, канака файл хакида гап кетяпти? Индекснинг бунга нима алокаси бор?
а) дбгридни свойстваларини караб куринг. EhLib ни гридиниям ишлатиб куринг.
б) bookmark дан фойдаланинг.

Последний раз редактировалось OmoN; 27.05.2011 в 22:28.
Ответить 
Старый 28.05.2011 06:30   #105  
Аватар для Ustoz
Оффлайн
MAKTAB
O`QITUVCHI
Сообщений: 682
+ 617  543/277
– 8  129/41

Uzbekistan
Цитата:
Сообщение от OmoN Посмотреть сообщение
Ишлаган бўлса бўлди. Программа айниб қолмасин дейманда Срок годности 1 месяц. Не употреблять после истечении срока
Men tayyor dasturlarni yoqtirmayman, chunki ming yaxshi ishlamasin, baribir mening talabimga javob bermasligi mumkin, shu sababdan ham Sizning dasturingizning ish prinsipini tushunib olib o`zimga moslab o`zgartirsam degandim, bunga ruxsat bordir axir. Aslida o`zi doim shunaqa qilib yuraman, unutmanglar men dasturchi emasman.
Ответить 
Реклама и уведомления
Старый 28.05.2011 11:04   #106  
Аватар для MAK
Оффлайн
Kollej
O'qituvchi
Сообщений: 82
+ 32  10/7
– 1  1/1

Uzbekistan
Ҳал бўлди.

DBGrid нинг dgEditing опцияси False турган холда Insert клавишасига хеч қандай реакция бўлмайди, шунинг учун Формага ActionList қўйдим. Унга янги ёзув қўшишга жавоб берувчи Акт (actNewExecute) ёздим. Бу актнинг ShortCut хусусиятига Ins клавишини боғладим.

Ёзув таблицанинг охирига қўшилиши учун Append қўлланиши керак экан.

Қуйида содда синов модулининг коди:

PHP код:
implementation
{$R *.dfm}
procedure TForm1.FormCreate(SenderTObject);
begin
   Query1
.Open;
end;
procedure TForm1.DBGrid1KeyDown(SenderTObject; var KeyWord;
  
ShiftTShiftState);
begin
   
if Key VK_RETURN
   then
   begin
     
if Query1.State in [dsEditdsInsert]
     
then
       Query1
.Post;
   
end;
end;
procedure TForm1.Query1AfterPost(DataSetTDataSet);
begin
    DBGrid1
.Options := DBGrid1.Options - [dgEditingdgAlwaysShowEditor];
end;
procedure TForm1.Query1AfterCancel(DataSetTDataSet);
begin
  DBGrid1
.Options := DBGrid1.Options - [dgEditingdgAlwaysShowEditor];
end;
procedure TForm1.actNewExecute(SenderTObject);
begin
  DBGrid1
.Options := DBGrid1.Options + [dgEditingdgAlwaysShowEditor];
  
Query1.Append;
  
DBGrid1.SetFocus;
  
DBGrid1.Fields[1].FocusControl;
end;
end
Рахмат, Омон. Агар сир бўлмаса, асосий дастурлаш инструментинигиз нима? Ва яна:
1) Дельфига Ўзбекистонда эътибор қандай?
2) Форумда делфинлар борми?
__________________
Провинциальный преподаватель программирования

Последний раз редактировалось MAK; 28.05.2011 в 11:27.
Ответить 
Старый 29.05.2011 12:49   #107  
Аватар для Ustoz
Оффлайн
MAKTAB
O`QITUVCHI
Сообщений: 682
+ 617  543/277
– 8  129/41

Uzbekistan
Цитата:
Сообщение от MAK Посмотреть сообщение
Форумда делфинлар борми?
Bu haqda boshqa forumlarda ham savollar berishgan, men Saidolim degan yigitni bilardim, hozir nima qilyapti bilmayman, ammo Delphini zo`r bilardi.MYPda tanishgandim. forum.dastur.uz da ham bir ko`rganday bo`luvdim.
Omon. Delphini bilgan odam mana shu BD bilan ihlashni qacha vaqtda o`rganib olishi mumkin, uning ustiga agar ilgari ozgina ishlagan bo`lsa. Bir o`rgatmaysizmi? Men Dbase da iashlagandim agar adashmasam, yo`nalishni ko`rsatish kerakligi menga yoqmagandi, baribir hammasida ham bir xil ekan-ku.
Ответить 
Старый 30.05.2011 00:14   #108  
uParty Member Known ID Group Ultimate
Аватар для OmoN
Оффлайн
програмщег
Сообщений: 4,971
+ 2,743  5,086/2,116
– 69  99/68

Uzbekistan
Цитата:
Сообщение от MAK Посмотреть сообщение
Рахмат, Омон. Агар сир бўлмаса, асосий дастурлаш инструментинигиз нима?
Ҳозирда Java ва PL/SQL. 4 йилдан бери делфида биронта тузукроқ иш қилганим йўқ. Шароит шуни тақозо қилди. Ундан аввал асосан делфида ишлаганман(4 йил). Қолган саволларга жавоб беролмайман. Лекин делфи билан ҳам нон топса бўлади.
Цитата:
Сообщение от Ustoz Посмотреть сообщение
Delphini bilgan odam mana shu BD bilan ihlashni qacha vaqtda o`rganib olishi mumkin, uning ustiga agar ilgari ozgina ishlagan bo`lsa.
Ҳамманинг ўзига боғлиқ. Масалан менга БД билан ишлай бошлаш учун 1 ой етарли бўлган. Лекин 8 йилдан бери тажрибамни тўлдириб бораман.
Цитата:
Сообщение от Ustoz Посмотреть сообщение
Bir o`rgatmaysizmi?
Ҳаракат қиламиз. dastur.uz да МБ ҳайида умумий тушунчаларни 3 та мақола қилиб ёзгандим. Менимча БД билан танишишга ёрдам берса керак.
Цитата:
Сообщение от Ustoz Посмотреть сообщение
Men Dbase da iashlagandim agar adashmasam, yo`nalishni ko`rsatish kerakligi menga yoqmagandi, baribir hammasida ham bir xil ekan-ku.
Базани қаердалигини автомат равишда топадиган қилсангиз йўл кўрсатиш шартмас
__________________
Ошибки прошлого, мудрость будущего. (с)Д.Тернер.
Ответить 
Старый 03.06.2011 12:01   #109  
uParty Member Known ID Group Ultimate
Аватар для OmoN
Оффлайн
програмщег
Сообщений: 4,971
+ 2,743  5,086/2,116
– 69  99/68

Uzbekistan
Оффтоп:
Цитата:
Сообщение от Ustoz Посмотреть сообщение
Men tayyor dasturlarni yoqtirmayman, chunki ming yaxshi ishlamasin, baribir mening talabimga javob bermasligi mumkin
"Бирон ишнинг идеал бажарилишини хоҳласанг уни ўзинг бажар" деган экан машойихлар.
__________________
Ошибки прошлого, мудрость будущего. (с)Д.Тернер.
Ответить 
Старый 04.06.2011 23:00   #110  
Аватар для Ustoz
Оффлайн
MAKTAB
O`QITUVCHI
Сообщений: 682
+ 617  543/277
– 8  129/41

Uzbekistan
Цитата:
Сообщение от OmoN Посмотреть сообщение
"Бирон ишнинг идеал бажарилишини хоҳласанг уни ўзинг бажар" деган экан машойихлар.
Siz bergan maslahatlarga baribir aqlim yetmadi, o`zim qo`limdan kelganicha qivomman, mana bugun ikkinchi kuni, judayam Siz qilganingizdakamasu ammo ishlavotti. Men faqat, DataBasedan foydalandim. Shu, hammasini bitta faylga joylashtirolmadim, har bir dars uchun alohida fayl ochyapman (bilaman Ayyayyay, ammo qo`limdan kelgani shu), baribir, maslahatlar uchun rahmat, bir uchrashib shular to`g`risida suhbatlashsak bo`larkan, manimcha mangayam 1-2 soat yetsa kerak bazibir narsalarni tushunib olish uchun.
Ответить 
Ответить




Powered by vBulletin® Version 3.8.5
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. Перевод: zCarot
Advertisement System V2.5 By Branden
OOO «Единый интегратор UZINFOCOM»


Новые 24 часа Кто на форуме Новички Поиск Кабинет Все прочитано Вверх