Все игры
Обсуждения
Создать тему
Сортировать: по обновлениям | по дате | по рейтингу Отображать записи: Полный текст | Заголовки

Программа Формодел делает курсовые по программированию на Delphi

Формодел — программное обеспечение для быстрого создания самостоятельных приложений для работы с базами данных. Курсовые и дипломные по программированию на Delphi могут быть выполнены с «Формоделом» за считаные минуты.

срочно помогите пожылуйста


привет всем! пришлите пожалуйста инструкцию и программный код и все что поможет создать сапера! только обезательно чтобы было сделано все через Delphi 3!

Sega Sega, 09-12-2011 14:14 (ссылка)

сумма столбца

Есть две связные таблица в Access 
первая база с данными по фио, воторая содержит  приход расход остаток. необходимо досчитать сумму по расходу в подчиненной таблице.
пытался сделать так
form3.ADOQuery1.Close;
form3.ADOQuery1.SQL.Clear;
form3.ADOQuery1.SQL.Add('select sum(Сумма) from Телефоны;');
form3.ADOQuery1.Open;
form5.Label21.Caption := form3.FindQuery.Fields[0].AsString;

результат считает сумму по всему столбцу сумма по всем фамилиям.
например иванов - 200 руб, петров - 200 руб, а она мне сразу 400 руб
собственно вопрос как подсчитать сумму по фамили.

Farida Dosbolova, 01-06-2011 17:34 (ссылка)

Delphi.генератор случайных чисел Random(100).Методом Шелли отсор

Delphi.генератор случайных чисел Random(100).Методом Шелли отсортировать по возрастанию эти 100 чисел.Должны быть графики чисел до и после отсортировки.

Метки: Delphi.генератор случайных чисел

важно!!!

Здраствуйте, предлагаю вам свое ПО и услуги
Баннер(винлокер, блокиратор Windows)
+Вылазиет на весь экран
+Блокирует диспетчер задач
+блокирует безопасный режим
+добавляется в автозагрузку
+Убираеться кодом
+Могу сделать любой дизайн и код
+Его очень сложно будет убрать

Цена 200-250( в зависимости от сложности дизайна)
Программные фейки
Фейк на mail.ru agent пароли приходят на e-mail цена 100 рублей
Фейк на yandex пароли приходят на e-mail цена 100 рублей
Фейк на Vkontakte пароли приходят на e-mail цена 100 рублей
Могу сделать программный фейк на любой сайт

Продажа сайта
Сайт на тему программирование и хакинг в общем все самое интересное в личку посещаемость 150-200 человек
Создание сайтов

При покупке какой нибудь программы в подарок вы получите много дополнительных
программ которые очень сложно найти в интернете

Писать на ha_cker@mail.ru

Требуется аналитик,разработчик, проектировщик


В крупную страховую компанию (ТОР 10) требуются Ведущий специалист отдела разработки отчетности, ведущий специалист отдела анализа и внедрения, ведущий специалист отдела проектирования.
Требования
Знание и опыт работы с БД Oracle от 2х лет.
Гражданство РФ, проживание Москва/Моксовская область
Образование высшее, техническое.
По всем вопросам обращайтесь 89151776635, 418673421
panferova@maxy-c.ru
maxy@mail.ru

настроение: боевое
хочется: найти специалиста
слушаю: коллег

Метки: аналитик, разработчик, проектировщик, oracle, работа. специалист, sql, delfi, СУБД

Как реализовать?

Можно ли сделать чтобы радиогрупп потихоньку угасал. Допустим я хочу сделать тест, появляется первый вопрос радиогрупп1(рг1), выбираю ответ рг1 исчезает и медленно появляется рг2, что-то вроде прозрачности.

Объединение таблиц

Имеются 2 таблицы Persons и Users. Нужно переместить данные из столбцов [FirstName], [LastName], [Gender], [CountryId], [CityId] int, [isNotifiedByEmail] таблицы Persons в таблицу Users (в Users нужно создать такие столбцы). Как я делаю:
Создаю табличную переменную, засовываю туда данные, которые нужно переместить (+колонка с identity для индексации). Делаю ALTER TABLE Users ADD <нужные столбцы>. В цикле загоняю из временной таблицы в новые столбцы. Затем уже создаю форейн кейсы.

В чем проблема:
Дело в том что компилироваться не хочет. Если столбцы еще не созданы, а в коде в начале есть добавление в таблицу новых столбцов, то компилятор все равно сообщает, что таких полей нет. Если в начале отдельно создать поля, а затем запустить код с добавлением, то работает отлично. Как решить проблему7 Нужно все сделать в одном запросе в виде скрипта для апдейта базы, без использования и создания stored procedures.
Подключаю код, то что нахимичил:


begin transaction
--Adding data from Persons table to @table
declare @table table(
ind int identity(1,1), UserId int,
FirstName nvarchar(50), LastName nvarchar(50),
Gender bit, CountryId int, CityId int, isNotifiedByEmail bit);
insert into @table
select UserId, FirstName, LastName,
Gender, CountryId, CityId, isNotifiedByEmail
from Persons;

--Adding new columns to Users table
alter table [dbo].[Users]
add [FirstName] nvarchar(50) COLLATE Cyrillic_General_CI_AS NULL,
[LastName] nvarchar(50) COLLATE Cyrillic_General_CI_AS NULL,
[Gender] bit NOT NULL DEFAULT ((0)),
[CountryId] int NOT NULL DEFAULT ((0)),
[CityId] int NOT NULL DEFAULT ((0)),
[isNotifiedByEmail] bit NULL DEFAULT ((1));

--Adding data to altered Users table from @table
--Update working by cycle
declare @from int, @to int, @userId int
declare @alterTable nvarchar(max);
declare @FirstName nvarchar(50),
@LastName nvarchar(50),
@Gender bit,
@CountryId int,
@CityId int,
@isNotifiedByEmail bit;
set @to = (select COUNT(*) from @table);
set @from=1;
declare @command nvarchar(max)

while (@from<=@to)
begin
set @UserId=(select UserId from @table as t where t.ind=@from)
set @FirstName=(select FirstName from @table as t where t.ind=@from)
set @LastName=(select LastName from @table as t where t.ind=@from)
set @Gender=(select Gender from @table as t where t.ind=@from)
set @CountryId=(select CountryId from @table as t where t.ind=@from)
set @CityId=(select CityId from @table as t where t.ind=@from)
set @isNotifiedByEmail=(select isNotifiedByEmail from @table as t where t.ind=@from)

--Здесь возникает ошибка! Говорит, что таких столбцов не существует. Пробовал через sp_executesql передать строку - все равно.
update [dbo].[Users]
set FirstName=@FirstName,
LastName=@LastName,
Gender=@Gender,
CountryId=@CountryId,
CityId=@CityId,
isNotifiedByEmail=@isNotifiedByEmail
where @UserId=Users.UserId
set @from=@from+1;
end

--Adding foreign keys to new columns
alter table [dbo].[Users] with check add constraint [FK_Users_Cities] foreign key([CityId])
references [dbo].[Cities] ([CityId])
alter table [dbo].[Users] check constraint [FK_Users_Cities]

alter table [dbo].[Users] with check add constraint [FK_Users_Countries] foreign key([CountryId])
references [dbo].[Countries] ([CountryId])
alter table [dbo].[Users] check constraint [FK_Users_Countries]

--deleting constraints and columns from Persons table
alter table [dbo].[Persons] drop constraint [FK_Persons_Cities]
alter table [dbo].[Persons] drop constraint [FK_Persons_Countries]
alter table [dbo].[Persons]
drop column FirstName, LastName, Gender, CountryId, CityId, isNotifiedByEmail

if @@trancount>0 commit transaction
else
rollback

--Checking =)
select * from Users


***адиль ***, 18-07-2010 08:38 (ссылка)

блокератор винды

продаю хороший блокератор  винды сделан в делфи =)стоимость 300 руб

Sergey B, 10-03-2010 12:01 (ссылка)

Выбор БД

Здравствуйте.
 
Порекомендуйте, какую БД в сочетании с Delphi можно использовть для локального телефонного справочника,
удовлетворяющим условиям:
- необходимость шифрования БД (чтоб доступ к БД имела только моя программа, и данные с базы никому больше не были доступны);
- хорошая скорость для применения команды `like` при том, что в БД строк примерно 400000;
- желательно без дополнительных dll и настроек типа BDE (хотя это не обязательно);
 
Хотелось бы чтоб кри каждом вводе символа в поле Фамилии сразу проиходила выборка и отображение подходящих данных.
 
Выслушаю рекомендации.
Заранее благодарю.
 

ilya ali, 22-07-2009 18:45 (ссылка)

canvas

svoystvo CANVAS kak s nim rabotat? qde ono voobshe nnoxoditsya?

Помогите!!!

Люди помогите пожалуйста мне! Я хочу создать базу данных (телефонный справочник), с поиском по номеру и по Фамилии имени отчеству. Скинте пож. прогу для ее создания. Зараннее спасибо!

настроение: Благодарное

Егор Иванов, 14-02-2006 16:37 (ссылка)

оператор is

Все знают оператор is, который может проверить, является ли объект объектом какого-то класса, например:
if Object is TEdit then TEdit(Object).Text:='lalala';

Вопрос. Как мне проверить переменную, а не объект? Нечто вроде:
if x is integer then x:=x+1;

Анастасия ~*~, 23-03-2008 22:04 (ссылка)

Помогите пожалуйста!!!!!!!!!!!!!!

Мне нужно написать программу в Delphi для расчета координат и построения бифуркационного дерева. Может кто - нибудь знает как это сделать. В принципе алгоритм построения я знаю, но ничего не получается.

Алексей ***, 16-01-2006 12:02 (ссылка)

Нужна помощь ... в проектировании БД

Здравствуйте.
Люди помогите ... нужно спроектировать релятивистическую (по-моему так пишиться) БД (на выходе не менее 4-5 таблиц в БД),
тема свободная (но не распрастраненая .. типа библиотека, магазин),
Нужно представить (вместе с разработкой по шагам) инфологическую модель данных, и вариант с ER-диаграмами (связями)
затем зделать нормолизацию таблиц по пяти формам.

До этого опыт небольшой был .. програмирования ГОТОВЫХ БД в дельфях .. но здесь .. темный лес,
даже электроную книгу про проектированию БД прочитал на раз 15 ... в голове тока каша ... а эфекта ноль.

настроение: Безнадёжное
хочется: Застрелиться ... утопиться ... и т.п.

Егор Иванов, 08-08-2006 16:33 (ссылка)

TForm и TFrame

Чего-то я не понял отличий. Кто пояснит?

Проблема со вставкой новой записи в таблицу.

Имеем, БД Interbase 7.5 таблица имеет 1 поле - тип integer, 2 поле тип - blob, 1е поле - автоинкремент по процедуре, триггеру и генератору, проверял из под IBExpert, работает великолепно, есть BDS 2006, с помощью DbNavigator пробую nbInsert говорит, что нужно значение 1го поля.
Прошу помочь в данном вопросе программистов БД. Заранее спасибо!

настроение: Обеспокоенное
хочется: сна
слушаю: DJ TONIC - Night Non Stop

Ромка ***, 16-12-2005 00:30 (ссылка)

TCP

Люди, подскажите. Делаю группу программ в делфи "клиент-сервер", в программе "клиент" пишешь любую стоку, нажимаешь отправить, (метод передачи данных TCP) и вместо того что бы эта строка появилась в поле Tmemo в проге "сервер" появляеться сообщение: Socket error # 10060
Connection timed out. Пробовал tcp порты менять, ничего не помогает...(((

настроение: Сонное
слушаю: Metallica - Nothing else matters

Без заголовка



Здарово! Меня зовут Random! В своем блоге я расскажу вам о том как я делаю крупнейший в России компьютерный фестиваль CHAOS CONSTRUCTIONS, объединивший тысячи людей интересующихся искусством, создаваемым на компьютере - от админов и блогеров до мызыкантов и дизайнеров, от программистов и геймеров до изобретателей и инженеров. Присоединяйся! Мы должны держаться вместе!
http://blogs.mail.ru/mail/compfest/

ЛЮДИ ДОБРЫЕ, ПОМОГИТЕ!

Мне нужно создать клавишный тренажер. Может у кого завалялась такая прога? (на базе DELPHI6)

А что тут такое???

Хотелось бы увидеть/услышать/прочитать мнения людей, занимающихся созданием программ, использующих базы данных.


Интересно знать область задач, возникающие проблемы (при создании баз данных, при использовании), способы их решения..


Пишите :)

настроение: Радостное

Sergey Grenivetskiy, 13-01-2006 00:27 (ссылка)

Соединение с MSSQL 2000

Привет всем, возникла следующая проблема
использую ADO подключение, к локальной базе данных производит, а вот к расположенной на другой машине, в локалке не подключает, причем логины и пароли все сходятся.
Кто-нить сталкивался с такой проблемой, или может что настроить надо, у кого всё работает, расскажите как настраивали, спасибо

Юрий ..., 07-12-2005 22:00 (ссылка)

Кристал репортс

Кто с ним работал ответьте на парувопросов.


1 Можно в процесе вызова из программы менять фонты и размеры областей?


2 Можно ли менять SQL запросы?


Или оно как построил шаблон так и юзаешь?


Если такое возможно то плиз урлы или примеры киньте.

настроение: Бодрое
хочется: Динамического управления отчетом Кристал Репортс
слушаю: Ретро ФМ

В этой группе, возможно, есть записи, доступные только её участникам.
Чтобы их читать, Вам нужно вступить в группу