Что такое findslide.org?

FindSlide.org - это сайт презентаций, докладов, шаблонов в формате PowerPoint.

Для правообладателей

Обратная связь

Email: Нажмите что бы посмотреть 

Яндекс.Метрика

Презентация на тему Строковый калькулятор в Delphi. Строковые функции

Содержание

Размещение элементов на форме
СТРОКОВЫЙ КАЛЬКУЛЯТОРВ DELPHI. СТРОКОВЫЕ ФУНКЦИИАвтор презентации: Комиссарова Е.Н.МОСКВА2010-2011 уч. год.Департамент Западного окружного Размещение элементов на форме Программный код.procedure TForm1.Button1Click(Sender: TObject);begin Label1.Caption:=Copy(Edit1.Text, StrToInt(Edit2.Text),StrToInt(Edit3.Text));end; procedure TForm1.Button2Click(Sender: TObject);begin Label1.Caption:='Длина строки = '+IntToStr(Length(Edit1.Text));end; procedure TForm1.Button3Click(Sender: TObject);var i: integer;begin i:=StrtoInt(InputBox('Ввод кода','Введите код от 0 до 255',' procedure TForm1.Button4Click(Sender: TObject);begin Label1.Caption:='Код символа '+ 'a'+' равен '+IntToStr(ord('a'));end;procedure TForm1.Button5Click(Sender: TObject);begin close;end; Программный код.procedure TForm1.Button1Click(Sender: TObject);beginLabel1.Caption:=Copy(Edit1.Text, StrToInt(Edit2.Text),StrToInt(Edit3.Text));end;procedure TForm1.Button2Click(Sender: TObject);beginLabel1.Caption:='Длина строки = '+IntToStr(Length(Edit1.Text));end;procedure TForm1.Button3Click(Sender: TObject);var
Слайды презентации

Слайд 2 Размещение элементов на форме

Размещение элементов на форме

Слайд 3 Программный код.
procedure TForm1.Button1Click(Sender: TObject);
begin
Label1.Caption:=Copy(Edit1.Text, StrToInt(Edit2.Text),StrToInt(Edit3.Text));
end;

Программный код.procedure TForm1.Button1Click(Sender: TObject);begin Label1.Caption:=Copy(Edit1.Text, StrToInt(Edit2.Text),StrToInt(Edit3.Text));end;

Слайд 4 procedure TForm1.Button2Click(Sender: TObject);
begin
Label1.Caption:='Длина строки = '+IntToStr(Length(Edit1.Text));
end;

procedure TForm1.Button2Click(Sender: TObject);begin Label1.Caption:='Длина строки = '+IntToStr(Length(Edit1.Text));end;

Слайд 5 procedure TForm1.Button3Click(Sender: TObject);
var i: integer;
begin
i:=StrtoInt(InputBox('Ввод кода','Введите код

procedure TForm1.Button3Click(Sender: TObject);var i: integer;begin i:=StrtoInt(InputBox('Ввод кода','Введите код от 0 до

от 0 до 255',' '));
Label1.Caption:='Символ кода '+IntToStr(i)+' равен

'+chr(i);
end;

Слайд 6 procedure TForm1.Button4Click(Sender: TObject);
begin
Label1.Caption:='Код символа '+ 'a'+' равен

procedure TForm1.Button4Click(Sender: TObject);begin Label1.Caption:='Код символа '+ 'a'+' равен '+IntToStr(ord('a'));end;procedure TForm1.Button5Click(Sender: TObject);begin close;end;

'+IntToStr(ord('a'));
end;


procedure TForm1.Button5Click(Sender: TObject);
begin
close;
end;

  • Имя файла: strokovyy-kalkulyator-v-delphi-strokovye-funktsii.pptx
  • Количество просмотров: 136
  • Количество скачиваний: 0
- Предыдущая Щелочноземельные металлы
Следующая - Гендерный подход в образовании детей дошкольного возраста

Похожие презентации

Системы счисления Системы счисления 99
компьютер компьютер 153
Основные понятия ООП Основные понятия ООП 211
Языки представления онтологий RDFS, OWL Языки представления онтологий RDFS, OWL 108
Табличный процессор MS Excel Табличный процессор MS Excel 156
Назначение и устройство компьютера (8 класс) Назначение и устройство компьютера (8 класс) 139
Презентация меншіктеу операторы, сандық функциялар 9 сынып Презентация меншіктеу операторы, сандық функциялар 9 сынып 175
Процессоры фирмы AMD до Athlon XP (Thorton, Model 10) Процессоры фирмы AMD до Athlon XP (Thorton, Model 10) 131
НАЧАЛО РАБОТЫ С EXCEL НАЧАЛО РАБОТЫ С EXCEL 133
Компьютерные технологии мониторинга и управления разработкой нефтяных месторождений. (Лкция 16) Компьютерные технологии мониторинга и управления разработкой нефтяных месторождений. (Лкция 16) 116
Файлы и папки Файлы и папки 146
Графический интерфейс ОС Windows Графический интерфейс ОС Windows 129
Современные технологии машинного перевода Современные технологии машинного перевода 173
интерактивное пособие Наша Армия презентация урока для интерактивной доски по информатике (старшая группа) интерактивное пособие Наша Армия презентация урока для интерактивной доски по информатике (старшая группа) 67
Устройства внутренней памяти Устройства внутренней памяти 139
Блок схемы Блок схемы 166
Язык программирования Бейсик. Обучающая программа по изучению языка Язык программирования Бейсик. Обучающая программа по изучению языка 102
Компьютерные вирусы. Антивирусные прораммы. Компьютерные вирусы. Антивирусные прораммы. 95
Презентация по информатике на тему Языки программирования. Структура программы на туркменском языке Презентация по информатике на тему Языки программирования. Структура программы на туркменском языке 194
Работа с электронной почтой в сети интернет Работа с электронной почтой в сети интернет 148
Панель инструментов PhotoShop. Панель инструментов PhotoShop. 169
Мультимедийный проект по предмету: Информатика Текст как информационный объект Мультимедийный проект по предмету: Информатика Текст как информационный объект 149
Работа с графическими объектами в Microsoft Word Работа с графическими объектами в Microsoft Word 150
Безопасное общение в социальных сетях Безопасное общение в социальных сетях 154
Система підтримки e-learning як засіб розвитку ІКТ-компетентностей працівників центрів дистанційної освіти університетів Система підтримки e-learning як засіб розвитку ІКТ-компетентностей працівників центрів дистанційної освіти університетів 117
Информационная система Проход и питание. Информирование о месте нахождения ребенка Информационная система Проход и питание. Информирование о месте нахождения ребенка 137
Розробка інформаційної системи для обліку та продажу програмних продуктів Розробка інформаційної системи для обліку та продажу програмних продуктів 109
Особенности служб сертификации в Windows Server 2008 Особенности служб сертификации в Windows Server 2008 135
История развития информационных технологий История развития информационных технологий 115
Процедуры. Назначение процедур Процедуры. Назначение процедур 117