Огромное спасибо !!!!!!!!
уже опробовал сам так не написал бы...
Еще раз огромное спасибо и низкий поклон.
1 2018-07-26 18:57:39
Re: разделить текст пр помощи SUBSTRING SQL (11 replies, posted in Russian)
2 2018-07-26 13:52:24
Re: разделить текст пр помощи SUBSTRING SQL (11 replies, posted in Russian)
в Edit'ах находятся данные записи из таблицы БД - Да
база данных :Him
берется из столбца : Naim_Metodica и выводится в Form2.Edit3.Text полный длинный текст
В Form2.Edit9.Text -необходимо вывести только часть текста из Form2.Edit3.Text - но только та часть которая мне нужна, например первая ГОСТ Р 50444-92.
Надеюсь щас Вас не запутал.
3 2018-07-26 13:08:37
Re: разделить текст пр помощи SUBSTRING SQL (11 replies, posted in Russian)
procedure Form2_OnShow (Sender: TObject; Action: string; Key: Char);
begin
Form2.Edit9.Text:= Copy (Form2.Edit3.Text,1,12); // с позиции 1 копировать 3 символа
SQLExecute ('SELECT SUBSTRING('+Form2.Edit9.Text+', 1, 1)');
end;
4 2018-07-26 11:18:07
Re: разделить текст пр помощи SUBSTRING SQL (11 replies, posted in Russian)
Вам строку "порезать" надо при выводе данных из БД на форму в компонент EditText?
до совершенно верно
5 2018-07-26 10:28:02
Re: разделить текст пр помощи SUBSTRING SQL (11 replies, posted in Russian)
В том-то и дело, что запись вида "ГОСТ Р 50444-92" не фиксирована . кол-во символов разная по длине.
по идеи скрипт должен работать но где то напортачил .
подскажите где ошибка .
SQLExecute ('SELECT SUBSTRING('+Form2.Edit9.Text+', '-', 1)');
?????
может есть пример как построить данный скрипт ????
Заранее благодарен .
6 2018-07-26 08:49:57
Topic: разделить текст пр помощи SUBSTRING SQL (11 replies, posted in Russian)
Приветствую Вас .
Прошу помочь с данным вопросом по разделению текста , на две части.
В Form2.Edit8.Text:= находится следующий текст.
ГОСТ Р 50444-92 Приборы, аппараты и оборудование медицинские. Общие технические условия (принят в качестве межгосударственного стандарта ГОСТ 20790-93) (с Изменениями N 1, 2).
При открытии формы Form2_OnShow
необходимо из Form2.Edit8.Text:
добавить в Form2.Edit9.Text:= только данное значение ГОСТ Р 50444-92
как понимаю это можно сделать при помощи SUBSTRING .
Очень прошу помочь и решить данный вопрос.
Заранее благодарен Владимир...