Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2011.12.18;
Скачать: [xml.tar.bz2];

Вниз

матрица   Найти похожие ветки 

 
Maxpch21 ©   (2011-09-08 13:14) [17]

А нельзя ли доработать то что уже сделано?
"Вот к примеру я нажимаю на RUN, заполняю StrengGreed таблицу цифрами(ну то бишь элементами), ставлю в edit1 и2 номера строки и столбца, нажимаю на копку и ничего не происходит, а надо чтобы после нажатия появлялась матрица с вырезаной строчой и столбцом кои номера я ввел в edit1 и 2.
То есть как изменить
procedure TForm1.btn1Click(Sender: TObject);
var
x,y,i:byte;
str,col:array[1..5] of integer;
begin
x:=strtoint(edt1.text);
y:=strtoint(edt2.text);
for i:=1 to 5 do begin
  str[i]:=strtoint(stringgrid2.cells[x,i-1]);
  col[i]:=strtoint(stringgrid2.cells[i-1,y]);
end;
end;

end.

Чтобы после нажатия на кнопку Buuton1 выходила матрица с вырезанной строкой edit1  и вырезанным столбцом edit2



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2011.12.18;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.004 c
2-1315215051
LinkolnBurrows
2011-09-05 13:30
2011.12.18
Проблема с использованием dll


4-1252399230
Jeyson
2009-09-08 12:40
2011.12.18
одно и тоже консольное приложение работает по разному


2-1315465617
user1987
2011-09-08 11:06
2011.12.18
Вывод текста на рабочий стол


15-1314396395
alexdn
2011-08-27 02:06
2011.12.18
Программа для видео


15-1314332947
xayam
2011-08-26 08:29
2011.12.18
Приглашение на Хабр





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский