Вопрос № 92638: Добрый вечер! Как создать программу для рачёта оплаты кредитов (за каждый год, месяц), что бы было видно сколько я заплачу по кредиту,сколько процентов. Как это всё расчитывается, по каким критериям?
.Вопрос № 92654: Доброго времени суток. У меня тут возник вопрос, может кто сталкивался. Мне на форме нужно отобразить много маленьких одинаковых рисуночков (допустим, спичек или палочек). Их количество (количество видимых) зависит от определенной переменной, как луч...Вопрос № 92661: Подскажите пожалуйста, как реализовать прокрутку картинки, т.е. есть картинка размером 400х2000, я хочу чтобы она прокручивалась (по таймеру)
ну допустим в TImage размером 400х200. Это панарамная съемка, а я хочу чтобы создался эффек движения путем п...Вопрос № 92700: здравствуйте. снова вас побеспокою. просто очень срочно нужен текст основных процедур - завтра экзамен.
"список отсортировать в алфавитном порядке по фамилии, если однофамильцы, то по имени, если тезки, то по отчеству"
зар...Вопрос № 92708: подскажите пожалуиста где можно скачать компоненты tdxtreelist и
tdxdbgrid на Delphi7 или 6 ...Вопрос № 92716: Подскажите пожалуйста, как используя картинки в рессурсах уменьшить объем проги, т.е. картинка 200kb и прога 200kb всего 400kb - это оптимальный размер. Но как картинку загоняю в ресурсы размер выростает до 1,5Mb, как исправить этот недостаток...
Вопрос № 92.638
Добрый вечер! Как создать программу для рачёта оплаты кредитов (за каждый год, месяц), что бы было видно сколько я заплачу по кредиту,сколько процентов. Как это всё расчитывается, по каким критериям?
Отправлен: 23.06.2007, 23:10
Вопрос задал: SIR (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)
Отвечает: Виктор Пырлик
Здравствуйте, SIR!
Расчет простых процентов. Формула расчета простых процентов по вкладам выглядит так:
S = (P x I x t / K) / 100, где
I – годовая процентная ставка
t – количество дней начисления процентов по привлеченному вкладу
K – количество дней в календарном году (365 или 366)
P – первоначальная сумма привлеченных в депозит денежных средств
S – сумма начисленных процентов.
Приведем условный пример расчета процентов: Принят депозит в сумме 50 тыс.руб. сроком на 20 дней по ставке 12 %. Расчет простых процентов по формуле показал, что сумма процентов составляет 328,77 руб.
50 000 руб. х 12 % х 20 дней / 365 дней / 100 = 328 руб. 77 коп.
По окончанию срока, возврат вложенных в депозит средств с начисленными процентами составил 50328,77 руб. Расчет простых процентов банки применяют при начислении проценты по депозитам (вкладам) с установленными сроками начисления в конце срока вклада. Капитализации процентов внутри срока по вкладу нет.
Расчет сложных процентов. Формула расчета сложных процентов по вкладам выглядит так:
S = ( P x I x j / K) / 100 , где
I – годовая процентная ставка
j – количество календарных дней в периоде, по итогам которого банк производит капитализацию начисленных процентов
К – количество дней в календарном году (365 или 366)
P – Первоначальная сумма привлеченных во вклад денежных средств., или первоначальная сумма с учетом капитализации процентов
S – сумма денежных средств, причитающаяся к возврату, равная первоначальной сумме привлеченных средств плюс начисленные капитализированные проценты.
Приведем условный пример расчета сложных процентов: Банком принят вклад (депозит) на 3 месяца в сумме – 10 тыс. руб. с процентной ставкой 22 % и ежемесячной капитализацией.
Расчет сложных процентов по формуле показал, что сумма процентов составляет 564 руб.83 коп. Банк три месяца производил начисление и капитализацию процентов.
1 месяц. 10000,00 руб. х 22% х 31 день / 365 дней / 100 = 186 руб. 85 коп.
2 месяц. 10186,85 руб. х 22% х 31 день / 365 дней / 100 = 377 руб. 19 коп.
3 месяц. 10377,19 руб. х 22% х 30 дней / 365 дней / 100 = 564 руб. 83 коп.
По окончанию третьего месяца сумма возврата депозита и процентов с капитализацией составила 10564,83 руб.
Если же ко второму примеру применить формулу расчета простых процентов, то сумма дохода составила бы только 10554,52 руб. Итак, какой можно сделать вывод? Расчет банковских процентов, производимый, по формуле расчета сложных процентов дает за счет капитализации процентов дополнительный доход в сумме 10,31 руб.
-------------------------------------------------------------------------------------
Но этот вопрос сложнее, и что бы реально что-то делать, надо разобрать с вопросами экономики. Есть множество сайтов, где довольно подробно всё описывается.
А реализация простая – на уровне простой арифметики.
--------- Если ничего не помогло - надо читать инструкцию
Ответ отправил: Виктор Пырлик (статус: 4-ый класс)
Ответ отправлен: 24.06.2007, 00:15 Оценка за ответ: 5
Вопрос № 92.654
Доброго времени суток. У меня тут возник вопрос, может кто сталкивался. Мне на форме нужно отобразить много маленьких одинаковых рисуночков (допустим, спичек или палочек). Их количество (количество видимых) зависит от определенной переменной, как лучше это сделать?
Отвечает: Omickron
Здравствуйте, Янчук Юрий Петрович!
Как вариант, задать переменную imgs:array of TPicture; Или, если ты используешь bmp - тогда TBitmap можно. Если только JPG - тогда TJpegImage.
Динамически создаёшь нужное тебе количество элементов массива
n:=20;
SetLength(imgs,n)
В первую загружаешь нужную тебе картинку, а все остальные связываешь с первой.
if Length(imgs)>0 then
begin
imgs[0].LoadFromFile(PICFNAME);
for i:=1 to Length(imgs)-1 do
imgs[i].Assign(imgs[0]);
end;
Можно также использовать TImageList, загрузить туда одну картинку, а потом рисовать её на канвасе в нужных тебе местах.
Ответ отправил: Omickron (статус: 3-ий класс)
Ответ отправлен: 24.06.2007, 08:21 Оценка за ответ: 5
Отвечает: BlackRaider
Здравствуйте, Янчук Юрий Петрович!
например можно так:
var ImageTemp:TImage;
I,N:integer;
begin
n:=5;//Кол-во объектов
for i:=1 to n do
begin
//Создаем экземпляр TImage принадлежащий компоненту Form1
ImageTemp:=TImage.Create(Form1);
//Присваиваем уникальное имя
ImageTemp.Name:='ImageCR'+inttostr[i];
//Тут указываем нужные нам свойства компонента
// включая загрузку картинки и обработку нажатия.
ImageTemp.Picture.LoadFromFile('c:1.bmp');
ImageTemp.Top:=10*n;
ImageTemp.Left:=10*n;
end;
end;
Ответ отправил: BlackRaider (статус: 1-ый класс)
Ответ отправлен: 25.06.2007, 08:47
Вопрос № 92.661
Подскажите пожалуйста, как реализовать прокрутку картинки, т.е. есть картинка размером 400х2000, я хочу чтобы она прокручивалась (по таймеру) ну допустим в TImage размером 400х200. Это панарамная съемка, а я хочу чтобы создался эффек движения путем перемещения картинки.
Отправлен: 24.06.2007, 09:51
Вопрос задал: Bee.line (статус: Посетитель)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Omickron
Здравствуйте, Bee.line!
Под объект TImage ставишь горизонтальный ScrollBar. Задаёшь пропорции (1% перемещения ScrollBar'а - это Image1.Picture.Bitmap.Width div ScrollBar.Max)
А по движению ScrollBar'а просто смещаешь Image1.Picture.Bitmap.Left. Получается движение.
Ответ отправил: Omickron (статус: 3-ий класс)
Ответ отправлен: 24.06.2007, 09:59 Оценка за ответ: 3 Комментарий оценки: Спасибо за подсказку, но ты не обращаешь внимания что я хочу по Таймеру (это не проблема), сама проблема заключается в перемещении картинки и... Image1.Picture.Bitmap.Left - на это Delphi ругается
Отвечает: Louken
Здравствуйте, Bee.line!
Размести на форме TScrollBox (со вкладки Additional), установи его свойство ScrollBox1.HorzScrollBar.Tracking=true и ScrollBox1.Align=alClient (в инспекторе объекта). Вставь таймер на форму, задай Interval = 10. Размести на ScrollBox1, TImage, только размести его в левый верхний угол, измени свойство Image1.AutoSize=true (тоже в инспекторе объекта), потом вставь код который расположен в приложении. Свяжи событие таймера с обработчиком Timer1Timer (двойным щелчком по таймеру). Далее вставь картинку в Image1 и
запусти программу.
Приложение:
Ответ отправил: Louken (статус: 8-ой класс)
Ответ отправлен: 24.06.2007, 10:59 Оценка за ответ: 5 Комментарий оценки: Спасибо большое, все получилось. Но у меня вопрос: как спрятать полосу прокрутки, или ее только прятать за пределы формы. Если я отключаю Visible то ничего не работает
Вопрос № 92.700
здравствуйте. снова вас побеспокою. просто очень срочно нужен текст основных процедур - завтра экзамен.
"список отсортировать в алфавитном порядке по фамилии, если однофамильцы, то по имени, если тезки, то по отчеству"
Отвечает: UnRe@l
Здравствуйте, Светлана Сербина!
procedure TForm1.Button1Click(Sender: TObject);
begin
ListBox1.Sorted:=True;
end;
--------- Cogito, ergo sum (c) R. Descartes (1596-1650)
Ответ отправил: UnRe@l (статус: 3-ий класс)
Ответ отправлен: 25.06.2007, 03:18
Вопрос № 92.708
подскажите пожалуиста где можно скачать компоненты tdxtreelist и
tdxdbgrid на Delphi7 или 6
Отправлен: 24.06.2007, 16:39
Вопрос задал: Bolat (статус: Посетитель)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 1)
Отвечает: Градов Юрий Михайлович
Здравствуйте, Bolat! Delphi6,7 --------- Глаза боятся - руки делают!
Ответ отправил: Градов Юрий Михайлович (статус: Студент)
Ответ отправлен: 24.06.2007, 17:03
Отвечает: Louken
Здравствуйте, Bolat!
Можно порыться в форуме по библиотеке DevExpress:
http://forum.ru-board.com/topic.cgi?forum=33&topic=2214&start=380
Это не начало форума, но там есть вопросы по тем компонентам, про которые Вы упомянули.
И еще есть подобная тема в другом форуме (про то, где скачать):
http://www.forum.chertenok.ru/printtopic.php?t=2398.
Может поможет.
Ответ отправил: Louken (статус: 8-ой класс)
Ответ отправлен: 24.06.2007, 17:09
Вопрос № 92.716
Подскажите пожалуйста, как используя картинки в рессурсах уменьшить объем проги, т.е. картинка 200kb и прога 200kb всего 400kb - это оптимальный размер. Но как картинку загоняю в ресурсы размер выростает до 1,5Mb, как исправить этот недостаток
Отправлен: 24.06.2007, 17:53
Вопрос задал: Bee.line (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)
Отвечает: DimonSoft
Здравствуйте, Bee.line!
Вариантов несколько.
1. Используйте другой формат. Например, вместо BMP-файлов используйте PNG, JPEG или GIF.
2. Воспользуйтесь программами-упаковщиками. Кроме сжатия программы они добавляют к ней слабую, но достаточную для отражения нападений неопытных взломщиков, защиту. Наиболее известные - ASPack, ASProtect, UPX и т.п. Я лично пользуюсь ASPack'ом: достаточно удобно, единственная проблема - 30-дневное ограничение, которое, впрочем, [censored] .
3. Подумайте: а нужно ли вообще хранение этих ресурсов. Не лучше ли будет предоставить пользователю возможность самому выбирать рисунки для этой программы (если это, конечно, допустимо для данной конкретной программы).
Удачи.
Обсуждение обхода лицензионного соглашения и методов обхода запрещено правилами Портала! [Denisss]
Ответ отправил: DimonSoft (статус: 2-ой класс)
Ответ отправлен: 24.06.2007, 18:10
