Търся помощ за Delphi проект

Компютри и интернет, аудио и видео, GSM, електроуреди и всяка друга техника, различна от автомобилната, обзавеждане
Потребителски аватар
suggar
Мнения: 875
Регистриран на: Нед 19 авг 2007 19:46
Автомобил: Seat Ibiza
Двигател: ASV
Местоположение: Габрово

Търся помощ за Delphi проект

Мнениеот suggar » Сря 23 мар 2011 17:25


Трябва ми някой който разбира от делфи или по-точно трябва да направя форма или няколко в които дада мога да създавам репорти и да могат да се разпечатват.

С мои думи ... имам таблица с информация за даден брой хора и искам да генерирам списък със информацията от тази таблица, като да мога да избирам конкретно кои клетки с информация и кои хора да са в списъка.

Благодаря предварително!!!




Потребителски аватар
Чудомир
Мнения: 2856
Регистриран на: Вто 18 юли 2006 0:37
Автомобил: Passat 5.5 + Caravelle T4
Двигател: 03 V6 AMX + 97 VR6 AES
Местоположение: Нейде из Швабско или под тепетата

Re: Търся помощ за Delphi проект

Мнениеот Чудомир » Чет 24 мар 2011 9:59




Потребителски аватар
Adnan
Мнения: 3536
Регистриран на: Чет 08 фев 2007 14:36
Автомобил:
Двигател:
Местоположение: София
Контакти:

Re: Търся помощ за Delphi проект

Мнениеот Adnan » Пон 28 мар 2011 7:31


На какво ти е таблицата ако е на една от тези : мс-сял, оракле или интеребасе мога да ти дам компонент който е пипан (преправян) от мен специално за мои неща за репорти.
Ако искаш стандартен репорт що не ползваш вградения на делфито?
Или направо ми прати (Adnansmail@yahoo.com) таблицата с каквото си направил до сега да погледна.


Потребителски аватар
suggar
Мнения: 875
Регистриран на: Нед 19 авг 2007 19:46
Автомобил: Seat Ibiza
Двигател: ASV
Местоположение: Габрово

Re: Търся помощ за Delphi проект

Мнениеот suggar » Пон 28 мар 2011 10:47


таблицата е правена с вградения Databese Desktop (.db) ...знам че не е най подходящото но с това мога с това го направих.... за вградения компонент Rave-а ли имаш предвид, пробвах с него но нещо не мога да схвана как се работи с това


Потребителски аватар
Adnan
Мнения: 3536
Регистриран на: Чет 08 фев 2007 14:36
Автомобил:
Двигател:
Местоположение: София
Контакти:

Re: Търся помощ за Delphi проект

Мнениеот Adnan » Пон 28 мар 2011 11:41


Прати ми таблицата с това което си направил до сега.


Потребителски аватар
suggar
Мнения: 875
Регистриран на: Нед 19 авг 2007 19:46
Автомобил: Seat Ibiza
Двигател: ASV
Местоположение: Габрово

Re: Търся помощ за Delphi проект

Мнениеот suggar » Пон 28 мар 2011 14:08


Пратил сам ти на пощата...

един др вапрос... имам поле Тedit в което се пише дата, но ако не я въведа ми дига ексепшън, а ми е нужно да може да се остави празно?! всички опити до сега да го оправя неуспещни!


Потребителски аватар
Adnan
Мнения: 3536
Регистриран на: Чет 08 фев 2007 14:36
Автомобил:
Двигател:
Местоположение: София
Контакти:

Re: Търся помощ за Delphi проект

Мнениеот Adnan » Пон 28 мар 2011 14:55


А какво пише в exception'a ?
Може да са много причините, може полето което си му задал в таблицата да е not null. Може при инсърта да не го форматираш или дължината. Ще го видя довечера какво става и ще ти пиша утре.


Потребителски аватар
suggar
Мнения: 875
Регистриран на: Нед 19 авг 2007 19:46
Автомобил: Seat Ibiza
Двигател: ASV
Местоположение: Габрово

Re: Търся помощ за Delphi проект

Мнениеот suggar » Пон 28 мар 2011 15:20


"Could not convert variant of type (string) into type (date)"

Пробвахме да го обърнем със 'StrToDatе' и показва "' ' is not a valid Date"


Потребителски аватар
Adnan
Мнения: 3536
Регистриран на: Чет 08 фев 2007 14:36
Автомобил:
Двигател:
Местоположение: София
Контакти:

Re: Търся помощ за Delphi проект

Мнениеот Adnan » Пон 28 мар 2011 16:04


suggar написа:Пробвахме да го обърнем със 'StrToDatе' и показва "' ' is not a valid Date"

А как му взимаш стойността виж един много правилен пример :
begin
qryToInsert.Insert;
if Trim( TEditComp.Text ) > '' then
qryToInsert.FieldByName( 'MyDateField' ).Value := StrToDate( TEditComp.Text );
qryToInsert.Post;
end;

Не може да подаваш "" (нищо) и да очакваш да имаш резултат накрая.
По принцип е правилно да използваш TDateTime компонента. Ако искаш да го попълваш на ръка или изобщо да го пишеш в може да сложиш един TCheckBox до него. После при инсърта направо му взимаш сотойността.

if TCheckBoxComp.Checked then
qryToInsert.FieldByName( 'MyDateValue' ).Value := TDateTimeComp.Date;


Потребителски аватар
suggar
Мнения: 875
Регистриран на: Нед 19 авг 2007 19:46
Автомобил: Seat Ibiza
Двигател: ASV
Местоположение: Габрово

Re: Търся помощ за Delphi проект

Мнениеот suggar » Пон 28 мар 2011 22:53


Ами чесно казано не го разбрах, моите познания са много малки , както ще видиш , но така го мога така го правя, знам че не е най удачния начин , но просто до там си стигат познанията по Делфи. :(

П.П. ще пробвам да му сложа отметка да деактивира полетата които да не се попълват и така ще избегна въвеждането... дали ще се получи? няма ли да даде грашка че в някои полета на таблицата не се записва нищо?


Потребителски аватар
Adnan
Мнения: 3536
Регистриран на: Чет 08 фев 2007 14:36
Автомобил:
Двигател:
Местоположение: София
Контакти:

Re: Търся помощ за Delphi проект

Мнениеот Adnan » Вто 29 мар 2011 7:13


Пратил съм ти компонента по емейла.
Спокойно никой не се е родил научен.

suggar написа:П.П. ще пробвам да му сложа отметка да деактивира полетата които да не се попълват и така ще избегна въвеждането... дали ще се получи? няма ли да даде грашка че в някои полета на таблицата не се записва нищо?


Това зависи как си направил таблицата в базата си. Пример ако задедеш колона от тип "Number not null" а се опитваш да запишеш на това поле нищо "" тогава, ще ти върне грешка.
Можеш да конвертираш всичко към String, но от String към различни други типове трябва да се съобразяваш.
Не може конвертираш от нищо нещо.

Ако искаш дай да минаваме на емейли, че тук така може да си говориме много дълго време. Аз погледнах това което си направил. Важно то е както казват всички "работи ли не го пипай".



Върни се в “ОФФ-Топик - електроника, техника, обзавеждане”

Кой е на линия

Потребители, разглеждащи този форум: Няма регистрирани потребители и 36 госта