Форум: "Потрепаться";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.05.02;
Скачать: [xml.tar.bz2];




Вниз

Как в Едит загружать данные из файла ? 


IronHawk   (2002-03-26 13:32) [0]

Можно ли грузить строку из файла в едит .... например как в КомбоБокс (КомбоБокс.ИтемИндекс.ЛоадФромФайл("c:\файл.тхт"))?

Или ещё как ?



panov   (2002-03-26 13:36) [1]

Таких компонент нет в Delphi.



AFROLOV   (2002-03-26 13:40) [2]

Руками. Читаешь строчку из файла, пихаешь ее в edit.



sudiv   (2002-03-26 13:42) [3]

Да и в "КомбоБокс" такой трюк не пройдет.



IronHawk   (2002-03-26 14:02) [4]


> sudiv ©

ComboBox1.Items.LoadFromFile("c:\autoexec.bat");
Очень даже проходит !

> AFROLOV (26.03.02 13:40)
> Руками. Читаешь строчку из файла, пихаешь ее в edit.

Например ? (Ctrl+C & Ctrl+V)!
Или по другому ?



panov   (2002-03-26 14:06) [5]

Как ты это себе представляешь?
Несколько строк записать в одну?
Или прочитать одну строку?

Может быть, вопрос конкретнее сформулируешь?



Вадим   (2002-03-26 14:06) [6]

var
f: TextFile;
s: string;
begin
Assign(f, "myfile.txt");
Reset(f);
ReadLn(f, s);
CloseFile(f);
Edit.Text := s;
end;

ЗЫ КомбоБокс. ИтемИндекс.ЛоадФромФайл("c:\файл.тхт"))
ComboBox1. Items.LoadFromFile("c:\autoexec.bat");



Alx2   (2002-03-26 14:07) [7]

Если все загнать в Edit1, то
Var
SList : TStringList;
begin
SList := TStringList.Create;
try
SList.LoadFromFile("filename.txt");
Edit1.Text := SList.Text;
finally
SList.Free;
End;
end;



MBo   (2002-03-26 14:08) [8]

>КомбоБокс. ИтемИндекс.ЛоадФромФайл
>ComboBox1. Items.LoadFromFile
разницу чувствуешь?



IronHawk   (2002-03-26 14:28) [9]


> panov ©

У меня файл с одной цифрой
мне эту цифру надо загнать в Едит !
КАК ?

> MBo ©

Чувствую, немного по клаве промахнулся ! :-)))



MBo   (2002-03-26 14:32) [10]

>мне эту цифру надо загнать в Едит !
см
Вадим © (26.03.02 14:06)



Вадим   (2002-03-26 14:34) [11]

Уже сказали!



IronHawk   (2002-03-26 14:39) [12]


> Вадим © (26.03.02 14:34)
> Уже сказали!

THANK YOU !



IronHawk   (2002-03-26 14:50) [13]


> Вадим ©

[Error] Unit1.pas(828): Incompatible types: "TPersistent" and "Text";
Assign( @f@-тут , "myfile.txt");



IronHawk   (2002-03-26 14:52) [14]

Не Assign
А AssignFile !



IronHawk   (2002-03-26 15:49) [15]


> Вадим ©

Появилась трабла!
Текст из файла негрузиться Едит очищаеться, прога ерроров недаёт но и неисполняет требуемое !
Кде непревильно ?
Я твой код от Вадим © (26.03.02 14:06)
Вставил в КреатФорм !



vopros   (2002-03-26 16:34) [16]

Код работает. Он у тебя файл находит?



IronHawk   (2002-03-26 16:43) [17]

Да, втом-то и дело что находит !



sudiv   (2002-03-26 16:45) [18]

> ComboBox1.Items.LoadFromFile("c:\autoexec.bat");
Такой - да,
а такой
КомбоБокс.ИтемИндекс.ЛоадФромФайл("c:\файл.тхт"); ???



Johnmen   (2002-03-26 16:47) [19]

>vopros © : А ты никогда раньше не общался с IronHawk © ?
Судя по всему - нет. Так вот - замутит, затянет и заболтает !

>IronHawk © : Без обиды !



IronHawk   (2002-03-26 17:06) [20]


> sudiv ©

Мы это проехали 15 советами раньше !

> Johnmen ©

И ненадейся, я необижаюсь .... !



Johnmen   (2002-03-26 17:13) [21]

Скажи, IronHawk © , пожалуйста, а ты существуешь реально или ты виртуален ? Но только не обманывай старших !!!



IronHawk   (2002-03-26 17:16) [22]


> Johnmen © (26.03.02 17:13)
> Скажи, IronHawk © , пожалуйста, а ты существуешь реально
> или ты виртуален ? Но только не обманывай старших !!!

Да, реально существую !
Не старших, я твой бывший однокласник !
Чё неузнаеш общий стиль обучения ?



Johnmen   (2002-03-26 17:23) [23]

Все ясно - раз ты не моложе, значит нагло врешь ! ;o)



IronHawk   (2002-03-26 17:45) [24]


> Johnmen ©

Нет, не нагло вру, просто - грязно шучу !
Я РЕАЛЬНЫЙ !



IronHawk   (2002-03-26 18:30) [25]

О! Я уже тут !
Класс, как мило !
Наконец-то, спасибо panov ©




Форум: "Потрепаться";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.05.02;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.75 MB
Время: 0.022 c
1-2524            Aliev Adil            2002-04-20 22:41  2002.05.02  
StringGrid


14-2646           Donal_Graeme          2002-03-25 00:11  2002.05.02  
про модераторов


7-2693            RUS1                  2002-02-05 12:25  2002.05.02  
Господа!!! Как сделать чтобы прога сама себя удалила после выполнения


4-2723            cok11                 2002-02-27 13:28  2002.05.02  
Не фурычит!


1-2602            dull                  2002-04-19 17:22  2002.05.02  
группа програмистов (2 чел.) ищет работу на Delphi