Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
ryudzaki
0 / 0 / 0
Регистрация: 05.02.2014
Сообщений: 67
1

StringGrid. Нужно чтобы из первой таблицы брались цифры и вносились во вторую и к каждому числу прибавлялось 5

06.05.2014, 14:44. Просмотров 338. Ответов 2
Метки нет (Все метки)

Здраствуйте, уважаемые знатоки. Нужно чтобы из первой таблицы брались цифры, и вносились во вторую и к каждому числу прибавлялось+5
StringGrid. Нужно чтобы из первой таблицы брались цифры и вносились во вторую и к каждому числу прибавлялось 5

Код программы:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
unit Unit2;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Grids, StdCtrls;
 
type
  TForm2 = class(TForm)
    strngrd1: TStringGrid;
    strngrd2: TStringGrid;
    btn1: TButton;
    lbl1: TLabel;
    procedure btn1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
var
  Form2: TForm2;
  i,g:Byte;
  sum:Integer;
 
implementation
 
{$R *.dfm}
 
procedure TForm2.btn1Click(Sender: TObject);
begin
Randomize;
sum:=0;
for i:=0 to 2 do begin
for g:=0 to 2 do begin
strngrd1.Cells[i,g]:=inttostr(Random(50));
sum:=sum+strtoint(strngrd1.cells[i,0]);
end;
lbl1.caption:='Сумма:='+inttostr(sum);
end;
end;
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
06.05.2014, 14:44
Ответы с готовыми решениями:

Нужно, чтобы во вторую ячейку записывался тот же текст из первой ячейки, но без первого слова
Привет всем! Т.к. я в VBA еще "витаю около", слезно прошу помочь мне с шаблоном...

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

Найти двузначные числа, у которых сумма удвоенного квадрата первой цифры и квадрата второй цифры равен самому числу
Найти двузначные числа, у которых сумма удвоенного квадрата первой цифры и...

Перенос строки из первой таблицы во вторую
Здраствуете мне нужно чтобы при нажатии на строку из таблицы 1 "Принтеры" в...

По заданному натуральному числу n определить сумму первой и последней цифры
Программа которая по заданному натуральному числу n определяет сумму первой и...

2
Puporev
Модератор
55120 / 42359 / 29259
Регистрация: 18.05.2008
Сообщений: 100,109
06.05.2014, 16:06 2
Повесь свои неработающие ссылки себе на стену. У нас принято все грузить в тему.
0
long399
152 / 152 / 93
Регистрация: 16.10.2013
Сообщений: 736
Записей в блоге: 3
06.05.2014, 19:47 3
Цитата Сообщение от ryudzaki Посмотреть сообщение
и к каждому числу прибавлялось+5
Вот программа:
0
Вложения
Тип файла: rar Прибавка к элементам stringgrid +5.rar (516.9 Кб, 2 просмотров)
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
06.05.2014, 19:47

Перенести только отсутствующие данные из первой таблицы во вторую
Есть 2 таблицы: table1 Коля Курит Вася Пьет Петя ломает игршки...

Вторую строку нужно скопировать в конец первой
Нужно написать программу, суть такая: Вводятся с клавиатуры две строки,...

Как перенести стоимости из первой таблицы во вторую соответственно артикулу.
Здравствуйте, господа компьютерные ковбойцы! нужна помощь в написании...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru