PDA

Просмотр полной версии : Создание простейшего калькулятора (на Delphi) - проблема с полем ввода


ozhjog
29.05.2007, 17:55
Помогите люди добрые!!Вот решил написать калькулятор,и возник вопрос:Как сделать так чтобы в Edi1 можно было бы писать много цифр а не одно ток число. например 12345 т.е чтобы edit1 был бы дисплеем калькулятора и в нём ток в нём можно было бы производить все исчесления?? спс всем=)

ozhjog
29.05.2007, 18:17
так ето куда до писать то надо?

je0n
29.05.2007, 19:20
так ето куда до писать то надо?
пацталом :)

я не понял, что ты иммешь под "много цифар" :) Тут даже и буквы можно писать насколько я знаю. Поподробнее опиши ситуацию. и попонятнее

Fata1ex
29.05.2007, 19:25
Ты хочешь писать: 4*1 в edit и получать в нем же ответ?=\

Zitt
29.05.2007, 19:31
Ты хочешь писать: 4*1 в edit и получать в нем же ответ?=\
Тож так понял))
ozhjog, ты уже спрашивал про калькулятор недавно, там же те всё рассказали, купи книгу по дельфи...

Fata1ex
29.05.2007, 19:34
Поля edit предназначены для ввода информации, для вывода есть label'Ы

Ci5
29.05.2007, 19:59
С такими вопросами тебе ответят на www.delphimaster.ru

Fata1ex
29.05.2007, 20:10
Просто надо учиться формулировать вопросы свои. И думать, прежде чем ты их задашь.

~Hidrag~
29.05.2007, 20:45
Да все просто, обрабатывай каждое нажатие клавиатуры на компоненте, как только будет нажата клавиша "=" распарсь введенный текст, выполни операцию и выведи в тот же едит введенное значение+результат

Fata1ex
29.05.2007, 20:48
А терь подумай как это геморно

-n00by-
30.05.2007, 13:36
я не вредный - в поизк посылать не буду,хотя вопрос тупой. Короч есть такие функции IntToStr и StrToInt. дальше сам подумай

ozhjog
30.05.2007, 15:42
я не вредный - в поизк посылать не буду,хотя вопрос тупой. Короч есть такие функции IntToStr и StrToInt. дальше сам подумай
Короче вот посмарите исходник:
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, MPlayer;

type
TForm1 = class(TForm)
Button1: TButton;
ResultEdit: TEdit;
Button2: TButton;
Button3: TButton;
Button4: TButton;
Button5: TButton;
Button6: TButton;
Button7: TButton;
Button8: TButton;
Button9: TButton;
Button10: TButton;
Button11: TButton;
DeleteButton: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin

ResultEdit.Text:=IntToStr(1);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
ResultEdit.Text:=IntToStr(2);
end;

end.

ozhjog
30.05.2007, 15:43
Если кто нить знает как так сделать напишите пж либо в асю либо здесь заранее признателен=)

Exile1985
30.05.2007, 15:55
так:


procedure TForm1.Button1Click(Sender: TObject);
begin

ResultEdit.Text:=ResultEdit.Text+IntToStr(1);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
ResultEdit.Text:=ResultEdit.Text+IntToStr(2);
end;

end.

желательно поставь запрет редактирования ResultEdit на прямую, найди в свойствах ResultEdit свойство Enabled и поставь false.

остальным: лучшеб помогли и ответили чем тупить и флудить

Piflit
30.05.2007, 15:55
ozhjog, ты весь код напиши, а то не понятно, к чему это:

procedure TForm1.Button1Click(Sender: TObject);
begin

ResultEdit.Text:=IntToStr(1);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
ResultEdit.Text:=IntToStr(2);
end;

ЗЫ пиши в тегах [CODЕ][/CODE]

mari00
30.05.2007, 17:52
А можно вопрос...В мемо выводить не дано??=\

ozhjog
30.05.2007, 17:55
А можно вопрос...В мемо выводить не дано??=\
неа в мемо не катит хочу калькулятор в Edit чтоб выводилось=)как виндовский стандартный=)ток пока мой мозг не готов к етому да и зык я ещё плохо знаю!мож вы мне ещё литературу какую нить стоящую посоветуети???спс =)

Piflit
30.05.2007, 18:04
чувак не нервничай всё ты можешь если захочешь=)

я знаю. хватит оффтопить.

ЗЫ Фленов, Библия Delphi

Fata1ex
30.05.2007, 18:09
ЗЫ Фленов, Библия Delphi
Это зло которое разрушает мозг! Культина читай

Piflit
30.05.2007, 18:12
Это зло которое разрушает мозг!

обоснуй

Exile1985
30.05.2007, 18:33
ЗЫ думаешь, я не могу калькулятор написать?)))))))))

дамаю не можешь :D, докажи!!!!


ЗЫ ржу не могу мля, как дети ей богу :D :D :D

ЗЗЫЫ » Иллюстрированный самоучитель по Delphi 7 для начинающих. - прошли уже (помню
листинги там с большим количеством ошибок да и вообще орфография хромает)
» Программирование в среде Delphi глазами хакера автор Фленов


библию делфи автор Фленов

» Delphi 5, Руководство разработчика, хотя бы 1 том;

» Mastering Delphi 6. Cantu Marco.
» Учебник по Delphi 7 для профессионалов.

тут вот посмотри: http://zipsites.ru/?n=15/10/4/

то что там есть:
» "Круглый стол" Королевства Дельфи
» 100 компонентов общего назначения библиотеки Delphi 5. Архангельский А.Я.
» 32 урока по Delphi.
» All 270 Delphi Classes. Delphi Rich Help. Greeven R.
» Borland Delphi 5. Ч. 1, 2. Тейксейра С, Пачеко К.
» Borland Delphi Usenet Articles. - July 23, 1999 to March 10, 2000. Below Peter.
» Delphi 5, Руководство разработчика. Том 1. Тейксейра С., Пачеко К.
» Delphi 5, Руководство разработчика. Том 2. Тейксейра С., Пачеко К.
» Delphi 5: среда разработки. Елманова Н.
» Delphi 6 (с приложениями).
» Delphi Russian Knowledge Base (рус.) Версия 2.2
» Delphi World - сборник статей и малодокументированных возможностей по программированию в среде Delphi
» Delphi in a Nutshell. Lishner Ray.
» Delphi5: новые возможности в MIDAS технологии. Трепалин Сергей.
» DelphiBook (с приложениями). Часть 2.
» Inprise MIDAS.
» Mastering Delphi 6. Cantu Marco.
» Mastering Delphi 7 (на анг.)
» QuickReport 2.0.
» Rave Reports Borland Edition 5.0. Руководство разработчика. Книга 1.
» Rave Reports Borland Edition 5.0. Руководство разработчика. Книга 2.
» Teach yoursel Book Delphi7 Studio (рус.)
» TurboPascal 7.0.
» Вопросы и ответы. Delphi and Windows API Tips'n'Trick.
» Доступ к COM серверам Microsoft Office из Delphi 5. Мирончик И.
» Иллюстрированный самоучитель по Delphi 6.
» Иллюстрированный самоучитель по Delphi 7 для начинаюших.
» Исходники.RU - Информационный сервер для программистов: исходники со всего света
» Книги различных издательств на английском языке
» Курс Borland Delphi.
» Курс уроков по Delphi.
» Программирование в Delphi 5.
» Сборник статей по Delphi (с примерами). Тенцер Анатолий.
» Советы по Delphi: 1-1000. Озеров В.
» Советы по Delphi: 1000-2000. Озеров В.
» Создание отчетов с помощью QuickReport 3 для Borland Delphi.
» Справочник по Object Pascal.
» Учебник по Delphi 4.
» Учебник по Delphi 6 для чайников.
» Учебник по Delphi 7 для профессионалов.
» Учебник по Delphi4.

Piflit
30.05.2007, 19:14
хм... интересная подборочка...
особенно круто:
» Учебник по Delphi 6 для чайников.
» Учебник по Delphi 7 для профессионалов.

Exile1985
31.05.2007, 17:39
хм... интересная подборочка...
особенно круто:

ну скачай почитай тогда :)

ЗЫ если не заметил там и другие нормальные книги есть