Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Базы данных и репортинг > Манипуляция с DBGrid


Автор: mr_tg 7.7.2011, 17:21
u menya "Grid"e 3 polye (Kolonki)
2-oye pole tekttovoye: tekst v takom formate "*12345*45678*78965*4567*55642"; dlina stroki nestandartno (neodinakovi).
3-   mogu vittashit ves tekst po kotoromu ya kliknul miwkoy.
 procedure TForm1.DBGrid1CellClick(Column: TColumn);
   begin
   Edit1.Text:=Column.Field.Text;
   end;
4-pomogite vittashit neves tekst po kotoromu ya kliknul miwkoy a tu chastichku teksta po kotoromu ya kliknul miwkoy
naprimer  Edit1.Text:='45678' ane ves tekst Edit1.Text:="*12345*45678*78965*4567*55642";

zarane SPS

Автор: Akella 7.7.2011, 22:38
Use RegExp (регулярные выражения)

Добавлено через 5 минут и 24 секунды
Или в цикле идёшь по тексту.
Встречаешь первую звёздочку и идёшь дальше, параллельно запоминая во временную переменную числа пока не встретишь следующую звёздочку.

Автор: mr_tg 8.7.2011, 11:46
zdrastvute Akella ! sps za vaw otklik na vopros.
Цитата

Или в цикле идёшь по тексту.

ya je zarane ne znayu kakoy otrivok teksta miwkoy viberu (kliknut po toy chasti teksta).
mne nado kokda nad tekstom miwko clickayu, ctobi  Edit1.Text pokazoval immeno tot otrivok (otrivok mejdu * kami)
esli mojno  smile  bilobi hororwo

Автор: Akella 8.7.2011, 13:37
Цитата(mr_tg @  8.7.2011,  11:46 Найти цитируемый пост)
ya je zarane ne znayu kakoy otrivok teksta miwkoy viberu (kliknut po toy chasti teksta).

Там где кликнули будет этой позиции равняться selstart, от этой позиции идёшь влево до звёздочки и право до звёздочки.

Добавлено через 1 минуту и 21 секунду
Допустим кликнули здесь:
Edit1.Text:='*12345*45678*789|65*4567*55642';


значит Edit1.selstart будет содержать значение 7

Автор: mr_tg 13.7.2011, 15:34
Akella ZDRASTVUYTE 
MOJNO (YESLI NE TRUDNO) PRIMERCHIK IMMENO TOGO CHTO YA HOCHU S dbgrid ?
UVAS OTVETI SLIWKIM KOROTKIYE (DLYA BEGINNEROV ETO TRUDO)
POMOGLIBI OCHEN ZARANE SPS

Автор: Akella 15.7.2011, 14:55
Цитата(mr_tg @  13.7.2011,  15:34 Найти цитируемый пост)
DLYA BEGINNEROV ETO TRUDO

Дык для начинающих есть спец раздел: http://forum.vingrad.ru/forum/forum-331.html

Попросить нужно модераторов, чтобы перенесли твою тему в тот раздел

Добавлено через 2 минуты и 10 секунд
В чём трудность-то? Покажи свой код, что там не так?

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)