Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.02.11;
Скачать: [xml.tar.bz2];

Вниз

И снова проблема .... многоуважаемые Мастера ! ! !   Найти похожие ветки 

 
IronHawk   (2002-01-24 16:35) [0]

автозаполнение в Edit-е из файла *.ini

У кого есть сходники ... я помню где-то обсуждалось (что б не сорить в форуме киньте на мыло IronHawk@ukrpost.net)

Есть файл 1.ini:
[Sys]
1=abcde
2=fghjk
3=lmnop
4=qrstu
5=vwxyz
6=qrttw


и надо шоб по введению символов выводились варианты из возможных которые прописаны в файле !

... заранее благодарен !


 
IronHawk   (2002-01-24 18:15) [1]

Чё никто незнает ?
Народ - ПЛИЗЗзззз !


 
Mbo   (2002-01-25 07:27) [2]

вчера-позавчера было то же про combobox в стиле IE. Поищи


 
Belov   (2002-01-25 09:34) [3]

Первое что пришло в голову
Считывай данные в TStringList

а затем осуществляй поиск методом IndexOfName(...)
и подставляй нужные значения
you_stringlist.values[you_stringlist.names[you_stringlist.indexofNames()]];




 
IronHawk   (2002-01-25 10:34) [4]

>>> Belov ©
Да это всё классно но мне с Edit-om надо !!!
А вот операция с методом IndexOfName(...) это хорошая идея !
но как её реализовать в моём случае ???


 
Belov   (2002-01-25 10:42) [5]

Ну смотри
Ты из ини файлы считываешь данные в TStringList,
St: TStringList

если у тебя в ини-файле только один раздел
то проще название раздела убрать из файла и сделать файл типа
1=оываоы
2=лваподл
3=влаоплв

затем
St.LoadFromFile(you_ini_file)
получаешь данные в формате
ключ = значение ( напоминает формат ини-файла, не правда ли ? )
Names=Values

на событие Edit1KeyPress обрабатываешь поиск на IndexOfName и выводишь данные


 
IronHawk   (2002-01-25 10:49) [6]

>>> Belov ©

Incompatible types: "TStrings" and "TCaption"

: - (((


 
Андрей Сенченко   (2002-01-25 10:51) [7]

Самый лучший исходник в этом случае - безусловно Твоя собственная голова. Одно дело спросить "как поместить иконку к часикам" - это вопрос нетривиальный, требующий специальных знаний, но здесь - чистой воды разработка алгоритма и если Ты хочешь программировать, а не конструировать свой код из чужих исходников, то возьми ручку, бумажку и сам нарисуй алгоритм, после чего реализуй его в простейших операторах, а уж потом дойдешь и до IndexOfName(...)


 
IronHawk   (2002-01-25 11:01) [8]

>>> Андрей Сенченко ©

О ДА !
Многоуважаемый Андрей Сенченко ! Я с Вами согласен !
Но время, Заставляет делать и не такие весчи (вернее его недостаток) !!!
... спасибо !


 
Андрей Сенченко   (2002-01-25 11:44) [9]

Да кстати а TStrinsg и TCaption действительно несовместимы ... Что делать - ума не приложу, наверное перустанавливать Винду ...

Ну хоть Хелп по TStrings у Тебя есть время почитать, а ?


 
IronHawk   (2002-01-25 11:53) [10]

>>> Андрей Сенченко ©
Я про прямой метдо ... у Вас уважаемый неправильный подход к общению в форума или минимум терпения ...
.. .. спасибо !


 
MBo   (2002-01-25 13:10) [11]

ну сюда-то загляни
http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1011711180&n=0


 
IronHawk   (2002-01-25 13:17) [12]

СТАВЛЮ ВОПРОС НЕМНОГО ПОДРУГОМУ

Есть 1 КомбоБокс 2 Едита и кнопка !

есть файло в текстовом виде:
1234|qwert|zasdf
5678|poiuy|ewtyui
09987|qwetriuy|qwezaqw

всё что находиться до первой "|"
должно выбираться в КомбоБокс и при выбре падало всё что до 2-й "|" в первый Едит, а всё что ПОСЛЕ 2-й "|" во второй !!!

(ПАдения в эдиты по выбору в комбо я реализовал ПРОСТЕЙШИМ ОБРАЗОМ НО НЕ ИЗ ФАЙЛА)

И САМОЕ ГЛАВНОЕ при введени данных в КОМБО, ПЕРВЫЙ И ВТОРОЙ ЕДИТЫ
И ПО клику на Кнопку дописывалось в конец файла и могло подватываться опять КОмбоБоксом ....
ТИПА МАЛЕНЬКОЙ НАВОРАЧИВАЮЩЕЙСЯ БАЗЫ В *.ТХТ виде без исспользования приложений и ОДБС и т.д.
с разделителями "|" !!!

P.S. .... вот по этому я и просил с самого начала исходники, знаю что они есть где-то, обсуждалось это ДАВНО где-то...

..... ЗАРАНЕЕ БЛАГОДАРЕН


 
IronHawk   (2002-01-25 13:22) [13]

>>> MBo ©
Спасибо большое ....
это сообщение 2-3-мя ниже....
да это мне помогло ! но главное чтоб подхватывало !
Он должен хранить историю в нужном мне виде, подхватывать, и сохранять !
.... СПАСИБО !


 
Андрей Сенченко   (2002-01-25 13:43) [14]

Ну это другое дело ..
Вот обработка строк с разделителями

( Автор Юрий Зотов © ):
S - исходная строка.
with TstringList.Create do
try
Text := StringReplace(S, ":", #13#10, rfReplaceAll);
A := Strings[0];
B := Strings[1];
C := Strings[2];
D := Strings[3];
E := Strings[4]
finally
Free
end;


( Автор : Dimka Maslov © )
procedure ExtractStrings(Str: TString; List: TStrings; Separator: Char);
var
P1, P2: PChar;
begin
List.BeginUpdate;
try
List.Clear;
P1:=PChar(Str);
repeat
P2:=StrScan(P1, Separator);
if P2<>nil then P2^:=#0;
List.Add(P1);
P1:=P2;
Inc(P1);
until P2 = nil;
finally
List.EndUpdate;
end;
end;


Говорят, что есть функция в RXLib. Сам не видел.


 
MBo   (2002-01-25 13:50) [15]

Не все понял, что тебе надо ;((
sl1,sl2:tstringlist;
...

s:=cb1.Text;
cb1.Items.Clear;
for i:=0 to sl.count-1 do begin
if pos(s,sl[i])=1 then begin
sl2.clear;
sl2.commatext:=stringreplace(sl[i],"|",",",[rfReplaceAll]);
edit1.text:=sl2[0];
edit2.text:=sl2[1]+"|"+sl2[2];
cb1.items.add(sl[i]);
//cb1.items.savetofile ???
end;
end;


 
IronHawk   (2002-01-25 14:19) [16]

>>> Андрей Сенченко ©
СПАСИБО ...
У меня есть все компоненты проинсталеные (Rx,Raize,ABC...).
Я такой в них невстречал ... может плохо смотрел.
ЗА КОД СПАСИБО ЕЩЁ РАЗ !

>>> MBo ©
Cпасибо ! А чё так грустно ?
А чё ... StringReplace(...) а не AddStrings(...)?
.... спасибо !

Я ещё отпишу если что ! ;-) .


 
MBo   (2002-01-25 14:28) [17]

>чё ... StringReplace(...) а не AddStrings
потому что commatext


 
IronHawk   (2002-01-25 15:09) [18]

>>> MBo ©
ОК !
СПАСИБО !


 
IronHawk   (2002-01-25 15:54) [19]

>>> Андрей Сенченко ©
&
>>> MBo ©

... У Вас многоуважаемые "Аськи" есть ?


 
MBo   (2002-01-26 07:36) [20]

у меня нет



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.02.11;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.49 MB
Время: 0.004 c
7-32352
Новенький
2001-11-06 00:58
2002.02.11
Нужно написать маленький чат на Delphi для работы через Lpt-порт


4-32377
Art
2001-12-10 15:57
2002.02.11
Вопрос по процессам!??


3-32122
Animal
2002-01-15 10:33
2002.02.11
Работа с таблицами без установки BDE на компьтере


1-32225
Zuvom
2002-01-24 15:07
2002.02.11
Запись в файл


3-32146
Ghost!
2002-01-14 17:30
2002.02.11
Нумерация строк





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский