Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 20.05.2012, 18:09
chingis chingis вне форума
Прохожий
 
Регистрация: 20.05.2012
Сообщения: 6
Репутация: 10
По умолчанию построить матрицу

Ребят подскажите пожалуйста...У меня есть Edit...там много значений 0 и 1...мне надо построить матрицу таким образом чтобы она брала допустим первое второе третье четвертое значение в строку из 1,2,3,4 в Edit...матрицу я сделал не через StringGrid...а просто кучу едитов сделал в виде матрицы...как мне сделать чтоб при нажатии кнопки из этого едита строилась матрица..значения идут по 4 в едите...всего 16 значений..ну и пробелы между ними конечно...как это всё реализовать подскажите!!!
Ответить с цитированием
  #2  
Старый 20.05.2012, 18:20
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

из memo: http://delphisources.ru/forum/showpo...96&postcount=2
Ответить с цитированием
  #3  
Старый 20.05.2012, 18:27
chingis chingis вне форума
Прохожий
 
Регистрация: 20.05.2012
Сообщения: 6
Репутация: 10
По умолчанию

Цитата:
Сообщение от Pyro

Ниче я не понял..объясни мне куда его вставить..вот у меня есть форма на ней есть Edit в котором есть значения 0000 0001 0010 0011..есть кнопка построить матрицу..что мне в этой кнопке прописать...есть вторая формаа на которой должны выйти матрица..не ней что нужно поставить мемо или что..чтобы отобразило матрицу...я ж новичек..я толком ниче не шарю))
Ответить с цитированием
  #4  
Старый 20.05.2012, 18:31
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

Если я правильно понял эти невнятные объяснения:
Ищем пробел, все до пробела посимвольно пихаем в соотв. EDITы.
Ищем следующий, пихаем все между ними так же.
Продолжаем до конца строки.

offtop: По одной точке и пробелу после предложений писать не интересно? И начинать новое предложение с большой буквы?
__________________
jmp $ ; Happy End!
The Cake Is A Lie.

Последний раз редактировалось Bargest, 20.05.2012 в 18:36.
Ответить с цитированием
  #5  
Старый 20.05.2012, 18:38
chingis chingis вне форума
Прохожий
 
Регистрация: 20.05.2012
Сообщения: 6
Репутация: 10
По умолчанию

Цитата:
Сообщение от Bargest
Если я правильно понял эти невнятные объяснения:
Ищем пробел, все до пробела посимвольно пихаем в соотв. EDITы.
Ищем следующий, пихаем все между ними так же.
Продолжаем до конца строки.

offtop: По одной точке и пробелу после предложений писать не интересно? И начинать новое предложение с большой буквы?


ну впринципе да...я просто незнаю как присвоить каждому символу значение какое то..и потом при нажатии кнопки чтобы значение этого символа в этой строке допустим первого переносилось в другой эдит..второй симл строки в другой эдит и т.д. у меня их 16 допустим..
Ответить с цитированием
  #6  
Старый 20.05.2012, 18:42
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

создай новый проект, кинь на форму все компоненты, используемые в последней процедуре того кода, назначь событие кнопке, и вставь код, что бы был в том же порядке как в оригинале.
запустил нажал посмотрел, поменял цифры нажал итд
Цитата:
при нажатии кнопки из этого едита строилась матрица
тот код берёт цифры из memo и ложит в массив, и обратно
обычно это делается, чтобы что-то с этим массивом делать...
Ответить с цитированием
  #7  
Старый 20.05.2012, 18:47
chingis chingis вне форума
Прохожий
 
Регистрация: 20.05.2012
Сообщения: 6
Репутация: 10
По умолчанию

просто у меня уже всё сделано и сделаны чертежи на А1..я уже немогу менять эдиты на мемо...уже надо так сделать...да и разбираться времени толком нет)
Ответить с цитированием
  #8  
Старый 20.05.2012, 18:49
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

тогда невидимый memo, который заполняется из edit-ов когда надо
Ответить с цитированием
  #9  
Старый 20.05.2012, 18:58
chingis chingis вне форума
Прохожий
 
Регистрация: 20.05.2012
Сообщения: 6
Репутация: 10
По умолчанию

Цитата:
Сообщение от Pyro
тогда невидимый memo, который заполняется из edit-ов когда надо


а это...то что ты кинул оно из мемо записывает в массив???зачем операция потом опять в мемо..понять немогу...мне надо записать типо в массив и потом в едиты...каждое значение массива в отдельный эдит!
Ответить с цитированием
  #10  
Старый 20.05.2012, 19:07
chingis chingis вне форума
Прохожий
 
Регистрация: 20.05.2012
Сообщения: 6
Репутация: 10
По умолчанию

чето я сделал как ты сказал всё скопировал вставил в форму сделал кнопку 2 мемо..и не компилируется сразу милион ошибок на первой строчке типа..
Ответить с цитированием
  #11  
Старый 20.05.2012, 19:55
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

Цитата:
милион ошибок
давай скрин
Цитата:
эдиты
вобще tstringlist-ы использует и можно без memo обойтись, то-есть при нажатии
PHP код:
list := tstringlist.create;
list.
add(edit1.text);
....
matrix convert(list);
list.
free 
в edit-ы:
PHP код:
list := convert(matrix);
edit1.text := list[0];
...
list.
free 
но раз у тебя даже с memo ошибки, сначала с ними разберись
Ответить с цитированием
  #12  
Старый 20.05.2012, 20:12
7nik 7nik вне форума
Прохожий
 
Регистрация: 28.02.2012
Сообщения: 9
Версия Delphi: 7
Репутация: 10
По умолчанию

если надо каждый элемент массива(mas) записывать в отдельный едит, то можно так:
Цитата:
for i:=1 to 2 do//кол-во рядов
for j:=1 to 3 do//кол-во столбцов
(Form1.FindComponent( 'Edit'+IntToStr(i)+IntToStr(j) ) as TEdit).Text := IntToStr(mas[i, j]);
все едиты должны иметь имя формата 'Edit'+[ №ряда ]+[ № столбца ], пример Edit35
Вложения
Тип файла: zip project1.zip (398.4 Кбайт, 5 просмотров)

Последний раз редактировалось 7nik, 20.05.2012 в 20:28.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 19:51.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025