|
|
Другие темы раздела | |
Delphi задача на StringGrid {Задана вещественная квадратная матрица порядка n. Построить последовательность чисел а1...аn по следующему правилу: если в i-ой строке элемент, принадлежащий главной диагонали, отрицателен, то аi равно сумме положительных элементов i-ой строки, в противном случае аi равно произведению отрицательных элементов i-ой строки.} type TStr = array of real; https://www.cyberforum.ru/ delphi-beginners/ thread422594.html |
"Cannot open file" как перехватить ошибку? Delphi procedure TForm1.Image1Click(Sender: TObject); var f:string; begin f:='Fas.jpg'; Image1.Picture.LoadFromFile(f); end; Если данного файла нет, вылетает ошибка. Необходимо, чтобы вместо сообщения об ошибке изменялся путь к файлу на другой, скажем, f:='Fas1.jpg' Облазил весь Гугл, но там только с помощью функции IOresult, а я не знаю, как её в моём случае применить. |
Delphi поиск файлов,чат и тд
https://www.cyberforum.ru/ delphi-beginners/ thread422553.html помогите решить |
Delphi Очень странные Pointer-ы Не новичок, но не знаю куда ещё писать. Выдает мегоошибку. Что не так? if Memo1<>TMemo(@Memo1) then Showmessage('Мегоошибка!'); https://www.cyberforum.ru/ delphi-beginners/ thread422530.html |
Delphi Как написать кавычки внутри кавычек? здравствуйте. как написать кавычки внутри кавычек? я пробовал так: IBQuery2.SQL.Text := 'execute procedure proc_imt( ''' Edit1.Text ''' + , + ''' edit2.text ''' )'; но компилятор всё равно не пропускает их |
Delphi Фйлы в Delphi
https://www.cyberforum.ru/ delphi-beginners/ thread422499.html Помогите составить программу , которая создает файл F1.DAT из 10 лементов типа Integer, вывести содержимое на экран. Удалить последние 5 элементов, вывести содержимое на экран (на форме 2 кнопки "Создать" и "Удалить" и Memo). ннапишите пожалуста код для каждой из кнопок. заранее спасибо!! |
Delphi Метод Зейделя недавно на сайте нашел код программы "Решение линейных уравнений методом Зейделя ", вроде бы подходит. Как работает сам метод знаю, но по программе ничего не понимаю, кто может объяснить как прога работает , а то не могу никак преподу сдать. Кто может объясните плж. {Решение СЛАУ методом Зейделя Идея: задана основная матрица A и вектор B Сначала нормализуем матрицу и вектор. Вычисляется... https://www.cyberforum.ru/ delphi-beginners/ thread422498.html |
Если есть форма и есть событие, а процедуры, его обрабатывающей нет в исходниках, то как это событие обрабатывается? Delphi Друзья! Изучаю синтаксис дельфи. Ну то есть к примеру такой код: procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char); begin case Key of #8,'0'..'9' : ; // цифры и клавиша <Backspace> #13: // клавиша <Enter> if StringGridl.Col < StringGridl.ColCount — 1 then StringGridl.Col := StringGridl.Col + 1; else |
Delphi Помогите рещить задачу !!!
https://www.cyberforum.ru/ delphi-beginners/ thread422483.html Нужно решить задачу у delphi, вот условие: Матрица L (m, n) состоит из нулей и единиц. Уничтожить в ней строки,которые совпадают, а другие упорядочить по возрастанию двоичных чисел, образованные строками. Заранее спасибо!! |
Delphi Вставка текст в браузер
https://www.cyberforum.ru/ delphi-beginners/ thread422459.html при выполнении данного кода procedure TForm1.AddNewMsg(Name, Date, Time, {Smiles,} Text:string); var s,AddMsg:string; Smile:array of Sm; i,SmilesCount:integer; begin SmilesCount:=1; i:=0; AddMsg:='<table><tr><td rowspan="2"><b>'+Name+'</b></td><td>'+Time+'</td></tr><tr<td>'+Date+'</td></tr></table><br>';//âñòàâèëè ñòðîêó,ñîäåðæàùþþ èìÿ è âðåìÿ è ïîìåòåëè æèðíû |
Delphi Конечный автомат Построить детерминированный конечный автомат по автоматной грамматике G=(N,\Sigma ,P,S) Определить язык допускаемый конечным автоматом. 1) N=(S,A,B,C,D), \Sigma =(0,1) , P=(S\rightarrow 1A, A\rightarrow 0S, A\rightarrow 1B, B\rightarrow 0C, C\rightarrow \varepsilon , C\rightarrow 0C, C\rightarrow 1D, D\rightarrow \varepsilon , D\rightarrow 0D) 2) N=(S,A), \Sigma =(a,b), P=(S\rightarrow... |
Delphi Определить, какой из треугольников имеет большую площадь Даны координаты вершин 2 треугольников определить какой из них имеет большую площадь? подскажите начинающему программеру! https://www.cyberforum.ru/ delphi-beginners/ thread422386.html |
4 / 4 / 1
Регистрация: 10.12.2010
Сообщений: 81
|
|
05.01.2012, 00:04 [ТС] | 0 |
запись уникальных строк в ListBox - Delphi - Ответ 235537705.01.2012, 00:04. Показов 1239. Ответов 2
Метки (Все метки)
Ответ
надо какнить без sql запросов... таковы условия
Вернуться к обсуждению: запись уникальных строк в ListBox Delphi
0
|
05.01.2012, 00:04 | |
Готовые ответы и решения:
2
Подсчет количества уникальных строк и числа строк с каждым из уникальных значений Запись строк из listBox в файл В ListBox вводится последовательность строк. Вывести их в ListBox в обратном порядке Вывод уникальных строк |
05.01.2012, 00:04 | |
05.01.2012, 00:04 | |
Помогаю со студенческими работами здесь
0
Удаление не выделенных строк в ListBox (Поиск в ListBox) Запись из listbox в listbox используя формулу Нахождение уникальных строк в таблице Выборка уникальных строк и вектора |