Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Форум программистов и сисадминов Киберфорум > Форум программистов > Delphi > Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Правила Карта форума Темы раздела Блоги Социальные группы Поиск Сообщения за день  
Другие темы раздела
Delphi Задача на указатели. Массив ссылок https://www.cyberforum.ru/ delphi-beginners/ thread596095.html
Доброго времени суток)) Решаю такую задачку: Дан массив ссылок на вещественные числа. Проверить, есть ли в массиве хотя бы два элемента, ссылающиеся на одинаковые числа. Как работать с указателями, когда нужно что-то с рядом вещественных чисел сделать мне понятно. А тут массив(( как с ним работать? Помогите, пожалуйста)) 		Delphi Dialogsave ошибка
При открытии ошибка в поле edt_count Открытие procedure TForm1.Btn_openClick(Sender: TObject); var s:string; i : Integer; begin if Dlg_open.Execute=True then f_name:=Dlg_open.FileName else exit; AssignFile(file_tov, f_name); Reset(file_tov);
Delphi Функция Pos ребят, помогите исправить некоторые строки в проге через функцию Pos в архиве, прикрепленном к письму, исходники программы. Заранее спасибо всем, кто примет участие) https://www.cyberforum.ru/ delphi-beginners/ thread596052.html Delphi Как сделать задачу по одномерному масиву https://www.cyberforum.ru/ delphi-beginners/ thread596035.html
Дан массив А, состоящий из N элементов. В массиве А все элементы до максимального (считать его единственным в массиве) увеличить на значение минимального элемента, после максимального упорядочить по возрастанию Заранее всех благодарю.
Delphi Изменение MAC адреса
Всем привет! Тут такая тема: каждые 15 минут меня блокируют по WiFi, типо надо заплатить денег. Я постоянно меняю значение Mac адреса чтоб посидеть ешё 15 минут. Так как ИП меняется и я могу сидеть ешё. Я написал программу для быстрой смены адреса , так как надоело лазить в сетевые подключения. Вроде с программой всё ок, но при нажатии на кнопку я получаю ошибку. посмотрите пожалуйста. Делал с... 		Delphi Сортировка массива записей (record) https://www.cyberforum.ru/ delphi-beginners/ thread595985.html
{Создать массив-расписание движения,хранящий информацию о 20 поездах,отправляющихся со станции. Каждый элемент расписания содержит следующую информацию:номер поезда, пункт назначения,время отправления,количество свободных мест в вагонах типа СВ, купе,плацкарт.Упорядочить массив по пункту назначения. Вывести номера поездов, отходящих в заданный период времени и следующих дозаданного пункта...
Delphi Не работает программа, где ошибка? изучаю Си,но нужна именно это программа,переделывать на си нет времени,поэтому помогите устранить ошибки в коде. Вот сам код procedure lUr(var mas:array of array of integer); var X, Y, h,k,i,j,b,sum,vdmax,minst: Integer; a: array of array of integer; c: array of array of integer; rbmas:array of array of integer; nvers: array of integer; https://www.cyberforum.ru/ delphi-beginners/ thread595968.html Шифры алгоритмом Трасмуса Delphi
Помогите, пожалуйста, учились писать по книжке, в которой было по шагово написано что делать...теперь не могу сообразить как написать, зная какой алгоритм... Задание 18 под 1). Начала писать процедуру заполнения ключа и не знаю как работать со строками.... Очень прошу...До сдачи зачета не допускают, пока эту прогу не напишу...=(
Delphi Одноразовая игра Memory помогите создать игру Мемори (без перемещения картинок!) https://www.cyberforum.ru/ delphi-beginners/ thread595930.html Delphi Нахождение соседней вершины полигона https://www.cyberforum.ru/ delphi-beginners/ thread595927.html
Добрый день. Во время реализации триангуляции полигона методом деления на монотонную часть возникла проблема. По этому алгоритму полигон делится на монотонные в которых то и нужно узнать являются ли точки упорядоченные по координате х соседними. к примеру этот полигон: http://gyazo.com/e32f958556d043853b7c3d8066a8b86f.png красной линией он разбился на 2 монотонных. и верхний теперь состоит...
Экспорт некоторых колонок DataSet в Word Delphi
по нажатию кнопки производится экспорт в Word таблицы находящейся в dbgrid1 код взял из этой темы: https://www.cyberforum.ru/delphi-beginners/thread550119.html procedure TForm3.N11Click(Sender: TObject); var MsWord,Table:Variant; i,j:integer; begin MsWord:=CreateOleObject('Word.Application'); MsWord.Visible:=False; 		Delphi Рассчитать сумму бесконечного ряда https://www.cyberforum.ru/ delphi-beginners/ thread595879.html
Доброго времени суток) Возникла такая проблема... Задача такая - нужно рассчитать сумму бесконечного ряда. y=1-1/2!+1/3!_1/4!..... Дело в том, что программу я написала, всё работает, а вот с формулой беда((( как её правильно записать? Помогите пожалуйста. Вот код: procedure TForm1.Button1Click(Sender: TObject); var y :real; //сумма ряда
0 / 0 / 1
Регистрация: 27.02.2012
Сообщений: 34
0

Двухмерный массив вывести в StringGrid - Delphi - Ответ 3123812

04.06.2012, 17:37. Показов 661. Ответов 1
Метки (Все метки)
Студворк — интернет-сервис помощи студентам
помогите переделать из паскаля в делфи:
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

var a:array[1..10]of real;
i,kol:integer;
begin
for i:=1 to 10 do
begin
a[i]:=random(201)-100;
write(a[i]:4);
end;
kol:=0;
for i:=1 to 10 do
begin
if a[i]>0 then
begin
a[i]:=a[i]/i;
inc(kol);
end;
end;
writeln;
writeln('Число замен= ',kol);
writeln;
writeln('Изменённый массив: ');
for i:=1 to 10 do
writeln(a[i]:3);
writeln;
end.
 
Вот,что пока "получилось":
var i,kol:integer;
for i:=1 to 10 do
   begin
     stringgrid1.cells[i-1,0]:=inttostr(random(201)-100);
 
      end;
        kol:=0;
        for i:=1 to 10 do
        begin
          if strtoint(stringgrid1.cells[i-1,0]) >0 then
          begin
  stringgrid2.cells[i-1,0]:=floattostr(StringGrid1.cells[i-1,0])/i;
            inc(kol);
          end;
      end;
Изменённый массив нужно вывести в stringgrid2.
 Комментарий модератора 
Теги кода добавлены модератором. По правилам форума, код должен быть оформлен соответствующими тегами. Для оформления кода Delphi следует выделить этот код и на панели редактирования сообщения нажать кнопку: "DELPHI".


Вернуться к обсуждению:
Двухмерный массив вывести в StringGrid Delphi
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
 04.06.2012, 17:37
Готовые ответы и решения:

Как вывести двухмерный массив в StringGrid?
Как вывести двухмерный массив

Как вывести двухмерный массив в StringGrid, чтобы размерность задавалась произвольно?
Как вывести двухмерный массив в StringGrid чтобы размерность задавалась произвольно Пожалуйста...

Stringgrid двухмерный массив
Извините за вопрос я навечек в этом деле, Возник вопрос как Stringgrid объявить как двухмерный...

Вывести массив в StringGrid
Нужно чтобы массив выводился не в label, а в stringgrid procedure TForm1.Button1Click(Sender:...

1
04.06.2012, 17:37
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
 04.06.2012, 17:37
Помогаю со студенческими работами здесь

Вывести массив в StringGrid
дана последовательность а1-а30. где а1 = а2. а(i) = a(i div 2) + a(i-2) Добавлено через 5 минут...

Вывести двумерный массив в StringGrid
Добрый вечер! Вот задание: Дан двумерный массив размерности 10х10. Заполнить его случайными числами...

Вывести в StringGrid динамический одномерный массив змейкой
имеется прямоугольная матрица, заполненная случайными числами. необходимо составить одномерный...

Заполнить двумерный массив числами из stringgrid и вывести его в listbox
Помогите пожалуйста найти причину ошибки вот в этом коде procedure TForm1.Button1Click(Sender:...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru