|
|
Другие темы раздела | |
Delphi Подсчёт повторений
https://www.cyberforum.ru/ delphi-beginners/ thread513869.html Здравствуйте ,у меня вопрос такой как мне подсчитать кол-во повторений подряд одного числа из random(52)(хотя без разницы )и записать в файл вывести на графике ... что то у меня пока не выходит если можете помогите плз))) |
Excel гипперссылка Delphi В delphi на форме имеется StringGrid уже с заполненными полями(Путь к файлу, размер). Далее таблицу перегоняю в excel. Нужен код, в котором на каждую ячейку(excel) в колонке Путь к файлу стояла гиперсылка. Допустим содержимое одной ячейки "С:\01.txt". Нужно чтобы и ссылка такая была. Добавлено через 1 час 55 минут Отзовитесь Добавлено через 42 минуты Кто нибудь Добавлено через 14 минут... |
Delphi Drag and drop в listbox
https://www.cyberforum.ru/ delphi-beginners/ thread513851.html Здравствуйте! есть такая процедура procedure TForm1.DropFiles(var Msg: TWMDropFiles); var dropFileName : array of Char; begin If DragQueryFile(Msg.Drop, 0, dropFileName, MAX_PATH) > 0 then lst1.Items.Add(dropFileName); DragFinish(Msg.Drop); end;все работает нормально, но как в листбоксе оставить только имя файла? |
Delphi работа с текстовыми файлами
https://www.cyberforum.ru/ delphi-beginners/ thread513837.html Дан текстовый файл, каждая строка которого изображает целое число, дополненное слева и справа несколькими пробелами. Вывести сумму этих чисел и их количество.procedure TForm1.Button1Click(Sender: TObject); var SL:TStringList; i,sum:integer; s:string; begin SL:=TStringList.Create; |
Delphi Простое шифрование методом перестановки символов Привет, форумчане. Помогите пожалуйста. Нужно составить программку, в которой будет вводиться строка, ключ шифрования, длина которого равна длине той самой строки, и по нажатию кнопки сообщение будет шифроваться и выводиться в Edit или Memo, не столь важно. Очень надеюсь на вашу помощь, так как в программировании полный нуб, а отчитаться надо. Буду также очень признателен комментариям в... |
Delphi Преобразование данных в вещественный тип и вычисление значений функции
https://www.cyberforum.ru/ delphi-beginners/ thread513781.html Задача стоит такая: Вычислить три значения выражения Y=AX^n+X^n/(2X-5) , начиная с X0 с приращением dX. Для решения задачи нужно преобразовывать строковый тип в вещественный. Для этого рекомендуется написать специальную подпрограмму, в которой необходимо воспользоваться процедурой Val. Так же необходимо при неверном вводе выводить сообщение об ошибке и прерывать выполнение программы. Для... |
Delphi что за алгоритм?
https://www.cyberforum.ru/ delphi-beginners/ thread513771.html число делится на $4000(16384), результат умножается на $10DCD(69069), $270(624) раз, получается массив байт из которого потом берутся пары по 8 байт, ксорятся, смещаются байты и так далее большое количество раз и это только начало, никто не сталкивался с таким алгоритмом? возможно это самописный вариант либо переделка от RC4-5-6:) |
Delphi MouseMove. Button при перемещении перемещается за пределы экрана. вообщем написал такую программу: когда наводишь на кнопку мышь, то кнопка появляется в другом месте. Но бывает так, что кнопка появляется за границами формы.. Как это исправить? Вот что я использую: procedure TForm1.Button1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin button1.top := random(screen.Width); button1.left := random(screen.Height); end; |
Delphi Как обеспечить вывод числа с точностью до определённого знака?
https://www.cyberforum.ru/ delphi-beginners/ thread513747.html Нужно вычислить выражение в Delphi с определённой точностью. Каким образом обеспечить желаемую точность, например 0,01. |
Delphi Как из одной формы обращаться к переменным другой формы Мне надо с Form1 на Form2 "перекинуть" переменную, которая считается на Form1 и выводится нa Label на Form2. помогите с кодом. https://www.cyberforum.ru/ delphi-beginners/ thread513684.html |
Задача на records Delphi У меня полный завал... проболела, пропустила много щас расхлёбываю... нужно в ближайшее время((( |
Delphi Работа со строками дано число К и тестовый файл. вставить пустую строку после строки с номером К, если такой нет то оставить без изменения type TForm1 = class(TForm) Button1: TButton; Edit1: TEdit; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } https://www.cyberforum.ru/ delphi-beginners/ thread513558.html |
0 / 0 / 0
Регистрация: 16.03.2011
Сообщений: 18
|
|
0 | |
Найти слова в тексте, не содержащие указанные буквы. - Delphi - Ответ 276781207.03.2012, 11:02. Показов 4589. Ответов 12
Метки (Все метки)
1 Дан текст на русском языке и не которые две буквы. Найти слова не содержащее указанные буквы.
2 Дан строка, подсчитать сколько различных символов встречаются в ней Вернуться к обсуждению: Найти слова в тексте, не содержащие указанные буквы. Delphi
0
|
07.03.2012, 11:02 | |
Готовые ответы и решения:
12
Найти в тексте слова, содержащие русские гласные буквы Найти в тексте слова, содержащие две одинаковые буквы, стоящие рядом Дана строка символов. Определить слова, содержащие одновременно 2 указанные буквы В произвольном тексте найти и отпечатать слова, содержащие букву i, но не содержащие букву m |
07.03.2012, 11:02 | |
07.03.2012, 11:02 | |
Помогаю со студенческими работами здесь
0
В заданном тексте найти слова, содержащие цифры В тексте найти и вывести слова, содержащие сочитание символов LF Найти все слова в тексте содержащие одинаковую часть найти в тексте слова содержащие не более одного дефиса |