Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Delphi Всплявающие подсказки в Combobox Записи в combobox не помещаются надо, чтоб при наведении на них выходила всплывающая подсказка, чтобы пользователь мог прочитать. я вообще делаю так, но не получается: H: THintWindow; procedure TForm1.ComboBox10Change(Sender: TObject); var p: TPoint; r: TRect; ArrayHintString: array of Char; begin showmessage('куку'); if H<>nil then H.Free; https://www.cyberforum.ru/ delphi-beginners/ thread130994.html Delphi Подскажите как реализовать задумку?
Всем здрасти, сейчас изложенную ниже задачу выполняет скрипт (VBScript) но он не совсем устраивает, т.к. много подводных камней в его работе. Программа будет запускаться на терминальном сервере, от нее нужно 1. программно определить есть ли подключение к терминальному серверу, если есть то разослать всем подключенным пользователям сообщение. 2. выполнить команду через cmd например...
Delphi надо парсить строку! https://www.cyberforum.ru/ delphi-beginners/ thread130893.html
привет всем! у меня тут такая задачка: считываю с файла строчку а в ней надо считать числа. при этом числа разделены символом #9. на картинке пример строки. суть строки- координаты х,у вот мне и нужно их вытащить попарно. пытался определить позицию этого символа, не получилось :-( . благодарю за помощь.
Delphi Сортировка из файла Ребят помогите набросать алгоритм программы(любым способом): Напомню задание: Информация о сотрудниках предприятия содержит фамилию, номер отдела и дату начала работы(вводится руками). Вывести списки сотрудников по отделам в порядке убывания их стажа ЗЫ: Уважаемая администрация-новая тема создана потому что старая превратилась в один большой комок информации-поэтому решил начать с нового... https://www.cyberforum.ru/ delphi-beginners/ thread130886.html
Delphi Программа запоминает любое число...а пользователь пытается угадать
программа запоминает любое число...а пользователь пытается угадать !(вот как то так,со слов)
Delphi Калькулятор комплексных чисел всем доброго времени суток, помогите пожалуйста написать калькулятор комплексных чисел, в программировании совсем почти ничего не шарю, а курсовик скоро сдавать. Вот, что у меня получилось unit main.kurs; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type https://www.cyberforum.ru/ delphi-beginners/ thread130838.html
Delphi процедуры https://www.cyberforum.ru/ delphi-beginners/ thread130813.html
Надо сделать задание:Разработать процедуру, которая в массиве целых чисел находит число, в двоичном представлении которого больше всего единиц и количество единиц в этом числе. Но у меня ничего не получается, подскажите в чем ошибка и что не так. type Tdar=array of integer; function dk(a:integer):integer; var c,x:integer; begin c:=0; while x>0 do
Описать функцию IntFileSize(Name) целого типа, возвращающую размер файла целых чисел с именем Name. Delphi
Помогите пожалуйста решить такую задачку на данный момент она мне не по силам так как пока еще плохо знаю Delphi! Задача.Описать функцию IntFileSize(Name) целого типа, возвращающую размер файла целых чисел с именем Name. Если файл не существует, то функция возвращает –1. С помощью этой функции определить размер трех файлов с данными именами.
Delphi Операции с битами https://www.cyberforum.ru/ delphi-beginners/ thread130781.html
Помогите пожалуйста сделать такое задание эту тему я плохо понимаю буду очень благодарен! Задание. Используя битовые операции проверить число А кратно 16 (вариации: кратно 4, кратно 8).
Delphi добавление в Регистр и считывание с него Подскажите пожалуйста, правильно ли сделал: procedure TForm1.Form1Show(Sender: TObject);//при появлении главного окна var AParams:TStringList; Dir:String; ws:WSize; fs:TFileStream; reg:TRegistry; begin //-работа с регистром https://www.cyberforum.ru/ delphi-beginners/ thread130770.html
Delphi Delphi 7, Автозаполнение формы TEidt
Здраствуйте) Как с помощью ComboBox взять данные с базы (таблица DBGrid)? заранее спасибо))
Delphi [Error] Unit1.pas(39): Operator not applicable to this operand type https://www.cyberforum.ru/ delphi-beginners/ thread130745.html
Unit1.pas(39): Operator not applicable to this operand type <Mawrat: это всё-таки сайт программистов, а не экстрасенсов. :) Опубликуйте код.>
126 / 126 / 24
Регистрация: 14.02.2010
Сообщений: 289
17.05.2010, 15:10 0

Определить на какую букву оканчивается 3-е слово в строке - Delphi - Ответ 732667

17.05.2010, 15:10. Показов 1207. Ответов 3
Метки (Все метки)

Ответ

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure TForm1.Button1Click(Sender: TObject);
var i,n:integer;
    s,s1:string;
begin
s:=Memo.Lines.Text;
 for i:=2 downto 1 do begin
 Delete(s,1,pos(' ',s));
 end;
 n:=pos(' ',s);
 s1:=copy(s,1,n-1);
 s:='';
 s:=s1[length(s1)];
 Edit1.Text:=s;
 
end;
Вот такой вариант!

Вернуться к обсуждению:
Определить на какую букву оканчивается 3-е слово в строке Delphi
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.05.2010, 15:10
Готовые ответы и решения:

Определить, на какую букву оканчивается второе слово в строке
Помогите, сам пытался чет программа совсем не пашет((( =)

Определить на какую букву оканчивается последнее слово
Определить на какую букву оканчивается последнее слово в предложении

Определить на какую букву оканчивается последнее слово
Определить на какую букву оканчивается последнее слово

Определить, на какую букву оканчивается третье слово
Программу я написал, но я хочу добавить условие, что если пользователь ввёл меньше трёх слов, то...

3
17.05.2010, 15:10
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.05.2010, 15:10
Помогаю со студенческими работами здесь

Определить на какую букву оканчивается четвертое слово в предложении.
1. В строке слова разделены пробелами. Определить на какую букву оканчивается четвертое слово в...

Дана последовательность слов. Определить на какую букву оканчивается второе слово в последовательности. (файл)
Дана последовательность слов. Определить на какую букву оканчивается второе слово в...

Определите, на какую букву оканчивается третье слово
написал и нашел одну программу помогите доделать куда поставить в первой (нашел ее) repeat и все...

Определить, на какую букву начинается третье слово в строке
Составить программу , определяющую, на какую букву начинается третье слово в предложении.

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru