Вопрос № 172876: Здраствуйте Уважаемые эксперты. Как можно на Delphi решить следующую задачу. Есть Image с картинкой. Она растянута на весь элемент. Сделал еще 3 image и хочу чтобы верхняя ее часть была в первом, средняя - во втором, и нижняя в третем и чтобы эти три...
Вопрос № 172885: Здравствуйте! Пытаюсь создать проводник по переходу по директориям на текущем носителе. с Выполнением поиска внутри тестового файла заданного слова. Вроде все работает, но при этом не получается выделить при отображении файлов в текущей директории...
Вопрос № 172890: Программа из матрицы n-го порядка получает матрицу порядка n-1 путем удаления из исходной матрицы строки и столбца,на пересечении которых расположен элемент с наибольшим по модулю значением. Собственно говоря код в приложении. Ошибку помогите найти, ...
Вопрос № 172876:
Здраствуйте Уважаемые эксперты. Как можно на Delphi решить следующую задачу. Есть Image с картинкой. Она растянута на весь элемент. Сделал еще 3 image и хочу чтобы верхняя ее часть была в первом, средняя - во втором, и нижняя в третем и чтобы эти три картинки можно было сохранить. Пожалуйста помогите.
Отвечает Selax, 3-й класс :
Здравствуйте, Dimon4ik. Попробуйте как в приложении. Image1 - исходная картинка.
Приложение:
Ответ отправил: Selax, 3-й класс
Ответ отправлен: 04.10.2009, 12:09
Как сказать этому эксперту "спасибо"?
Отправить SMS
#thank 254975
на номер 1151 (Россия) |
Еще номера »
Вам помогли? Пожалуйста, поблагодарите эксперта за это!
Вопрос № 172885:
Здравствуйте! Пытаюсь создать проводник по переходу по директориям на текущем носителе. с Выполнением поиска внутри тестового файла заданного слова. Вроде все работает, но при этом не получается выделить при отображении файлов в текущей директории желтым цветом, не могу понять в чем ошибкаURL >>
Отправлен: 04.10.2009, 15:10
Вопрос задал: maya91, Посетитель
Всего ответов: 1 Страница вопроса »
Отвечает Евгений/Genia007/, Студент :
Здравствуйте, maya91. Вам нужно в обработчик события formcreate добавить строчку
Код:
ListBox1.Style := lbOwnerDrawFixed;
и тогда Ваш код правильно заработает: будут выделяться жёлтым цветом файлы у которых стоит атрибут только для чтения.
----- Помогли тебе, помоги и ты.
Ответ отправил: Евгений/Genia007/, Студент
Ответ отправлен: 04.10.2009, 15:39
Оценка ответа: 5 Комментарий к оценке: Все работает) спасибо огромное))
Как сказать этому эксперту "спасибо"?
Отправить SMS
#thank 254986
на номер 1151 (Россия) |
Еще номера »
Вам помогли? Пожалуйста, поблагодарите эксперта за это!
Вопрос № 172890:
Программа из матрицы n-го порядка получает матрицу порядка n-1 путем удаления из исходной матрицы строки и столбца,на пересечении которых расположен элемент с наибольшим по модулю значением. Собственно говоря код в приложении. Ошибку помогите найти, пожалуйста.
procedure TMainWindow.btnCalcResultClick(Sender: TObject); var i,j,MaxI,MaxJ,MaxEl:Integer; begin if (MatrixEndGrdShow=False) then begin ShowMessage('Ошибка, размерность матрицы 1 не определена.');
mmoLog.Lines.Add('Ошибка, размерность матрицы 1 не определена.'); Exit; end; for i:=1 to MatrSize do for j:=1 to MatrSize do StartMas[i,j]:=Abs(StrToFloat(strngrdMatrixStart.Cells[j,i])); // Здесь вы забыли инициализировать MaxEl, MaxI и MaxJ // Кстати, компилятор по-идее должен был вам указать на это, по крайней мере на MaxEl MaxEl:=StartMas[1,1]; MaxI:=1; MaxJ:=1; for i:=1 to MatrSize do for j:=1 to Matr
Size do if StartMas[i,j]> MaxEl then begin maxEl:=StartMas[i,j]; MaxI:=i; MaxJ:=j; end; for i:=MaxI to MatrSize-1 do for j:=1 to MatrSize-1 do StartMas[i,j]:=StartMas[i+1,j]; for j:=1 to MatrSize do StartMas[MatrSize,j]:=0;
for i:=1 to MatrSize-1 do for j:=MaxJ to MatrSize-1 do StartMas[i,j]:=StartMas[i,j+1]; for i:=1 to MatrSize do StartMas[i,MatrSize]:=0; Dec(MatrSize); //
А тут забыли написать циклы for i:=1 to MatrSize do for j:=1 to MatrSize do strngrdMatrixEnd.Cells[i,j]:=FloatToStrf(StartMas[i,j],fffixed,6,2); end;
Вроде бы все, что нашел. С уважением, Дмитрий
Ответ отправил: Тимошенко Дмитрий, Студент
Ответ отправлен: 04.10.2009, 16:29
Как сказать этому эксперту "спасибо"?
Отправить SMS
#thank 254988
на номер 1151 (Россия) |
Еще номера »
Вам помогли? Пожалуйста, поблагодарите эксперта за это!
Оценить выпуск »
Нам очень важно Ваше мнение об этом выпуске рассылки!
* Стоимость одного СМС-сообщения от 7.15 руб. и зависит от оператора сотовой связи.
(полный список тарифов)
** При ошибочном вводе номера ответа или текста #thank услуга считается оказанной, денежные средства не возвращаются.
*** Сумма выплаты эксперту-автору ответа расчитывается из суммы перечислений на портал от биллинговой компании.