tmp := TButton(Sender).Caption; //что добавляем (заголовок кнопки)
s := Memo2.Lines[Memo2.Lines.Count - 1] + tmp;
if (tmp = '=') then begin
s := s + результат;
end;
Memo2.Lines[Memo2.Lines.Count - 1] := s;
//если пользователь нажал '=' добавляем новую строку
if (tmp = '=') then begin
Memo2.Lines.Add('');
end;
Калькулятор в дельфи
Подскажите пожалуйста как мне сделать в калькуляторе чтобы он сохранял в текстовый файл? только не просто результат какого то действия а вот так нпример 2+2=4 и это надо сделать для сложения умножения деления вычитания .
вот я сделал просто сохранение...
if SaveDialog1.Execute then//запись в файл + диалоговое оконо
begin
EditFile:=SaveDialog1.FileName;
Memo1.Lines.SaveToFile(EditFile);
Form1.Caption:='My Word - '+ExtractFileName(EditFile);
if Memo1.Modified then Memo1.Modified:=false;
end;
end;
вот я сделал просто сохранение...
if SaveDialog1.Execute then//запись в файл + диалоговое оконо
begin
EditFile:=SaveDialog1.FileName;
Memo1.Lines.SaveToFile(EditFile);
Form1.Caption:='My Word - '+ExtractFileName(EditFile);
if Memo1.Modified then Memo1.Modified:=false;
end;
end;
Цитата: baton666
Подскажите пожалуйста как мне сделать в калькуляторе чтобы он сохранял в текстовый файл?
Все, что нужно для того чтобы программа сохраняла содержимое TMemo в текстовый файл, вы уже сделали.
мне не так нужно чтобы сохранял, мне нужно допустим вводим на калькуляторе 2+2= он выдает ответ 4 и мне нужно чтобы все действие сохранялось в текстовый файл а не только ответ 4
В таком случае очевидно, что в TMemo нужно оставлять все, что требуется сохранить в текстовый файл.
и как мне это сделать не подскажете??? я в дельфи как бы не очень понимаю...
Высчитывать результат в отдельную переменную String. Потом написать: Memo.Text := Memo.Text + ' = ' + вычесленный_результат;
это где мне все писать в коде для поля мемо????
Или делать что-то подобное Memo1.Lines.Add().
да[COLOR="Gray"]где[/COLOR]угодно[COLOR="Gray"]писать[/COLOR]хоть[COLOR="#808080"]в[/COLOR]коде[COLOR="#808080"]для[/COLOR]поля[COLOR="#808080"]мемо[/COLOR]хоть[COLOR="#808080"]где[/COLOR]
да[COLOR="Gray"]где[/COLOR]угодно[COLOR="Gray"]писать[/COLOR]хоть[COLOR="#808080"]в[/COLOR]коде[COLOR="#808080"]для[/COLOR]поля[COLOR="#808080"]мемо[/COLOR]хоть[COLOR="#808080"]где[/COLOR]
спасибо попробую может что получится
Цитата: baton666
это где мне все писать в коде для поля мемо????
если в memo1 только результат - кидаем на форму memo2
в обработчиках кнопок
Код:
сто лет на delphi не писал... но логика должна быть понятна