IPB

Здравствуйте, гость ( Вход | Регистрация )

 
Reply to this topicStart new topic
> Помогите пожайлуста новичку по Delphi
@ндрюха!
сообщение Sep 24 2006, 16:20
Сообщение #1


Advanced Member
***

Группа: Members
Сообщений: 168
Регистрация: 13.9.2006
Пользователь №: 26251



Кто знает, подскажите пожайлуста, как сделать, чтобы написанные данные в Edit пи нажатии buttion сохранялись на компьютере ввиде текста. Зараннее ОГРОМНОЕ спасибо :-)
Go to the top of the page
 
+Quote Post
Renard
сообщение Sep 28 2006, 11:15
Сообщение #2


Junior Member
*

Группа: Members
Сообщений: 27
Регистрация: 25.3.2006
Пользователь №: 29373



procedure TForm1.Button1Click(Sender: TObject);
var f:textfile;
begin
assignfile(f,'c:/111.txt');
Rewrite(f);
Writeln(f,edit1.text);
Closefile(f);
end;

На форме находится Кнопка и Поле ввода Edit, тескт из Edit1 копируется в файл 111.txt на диске C:/
P.S. Имена элементов я не менял...так что там все по умолчанию...
Go to the top of the page
 
+Quote Post
@ндрюха!
сообщение Oct 2 2006, 20:47
Сообщение #3


Advanced Member
***

Группа: Members
Сообщений: 168
Регистрация: 13.9.2006
Пользователь №: 26251



Цитата(Renard;22586)
На форме находится Кнопка и Поле ввода Edit, тескт из Edit1 копируется в файл 111.txt на диске C:/
P.S. Имена элементов я не менял...так что там все по умолчанию...

ОГРОМНОЕ тебе спасибо, огромное. Если тебе не сложно, не мог бы ты мне подсказать как не записывать ,а наоборот читать (ну например в memo добоффлять?). Зараннее спасибо (IMG:http://forum.iseekyou.im/style_emoticons/default/smile.gif)
Go to the top of the page
 
+Quote Post
Renard
сообщение Oct 3 2006, 11:08
Сообщение #4


Junior Member
*

Группа: Members
Сообщений: 27
Регистрация: 25.3.2006
Пользователь №: 29373



Самый простой способ....у Тя на форме находятся: Кнопка, Memo поле и OpenDialog....на кнопку ты вешаешь вот эту процедуру:

procedure TForm1.Button1Click(Sender: TObject);
var pth:string;
begin
if opendialog1.Execute then
begin
pth:=opendialog1.FileName;
memo1.Lines.LoadFromFile(pth);
end;
end;
------------------------
терь ты можешь данные из любого текстового док-та добавить в memo-поле
Go to the top of the page
 
+Quote Post
@ндрюха!
сообщение Oct 3 2006, 21:01
Сообщение #5


Advanced Member
***

Группа: Members
Сообщений: 168
Регистрация: 13.9.2006
Пользователь №: 26251



Цитата(Renard;22709)
Самый простой способ....у Тя на форме находятся: Кнопка, Memo поле и OpenDialog....на кнопку ты вешаешь вот эту процедуру:и т.д.


ВОт пасибки тебе. Я от вижу что ты в Дельфи розбираешсо... А ты не подскажешь как открыть файл exe при нажатии Button??? разарнене спасибки (IMG:http://forum.iseekyou.im/style_emoticons/default/smile.gif)
Go to the top of the page
 
+Quote Post
Renard
сообщение Oct 13 2006, 13:04
Сообщение #6


Junior Member
*

Группа: Members
Сообщений: 27
Регистрация: 25.3.2006
Пользователь №: 29373



Короч...тестил на файле 1.txt....на exe-ники времени не было, что как говорится под руку попалось...
Те нужен OleContainer и кнопка...Имена стандартные..На кнопку вешаешь:
procedure TForm1.Button1Click(Sender: TObject);
begin
olecontainer1.CreateObjectFromFile('c:1.txt',true);
olecontainer1.DoVerb(0);
olecontainer1.Run;
end;
У меня открывает файл 1.txt, все норм работает...
Go to the top of the page
 
+Quote Post
memb3r
сообщение Oct 13 2006, 16:55
Сообщение #7


Grand Member
****

Группа: Members
Сообщений: 325
Регистрация: 26.12.2005
Пользователь №: 29043



Можно с помощью фун-ий API ... как ? google.com =)
Go to the top of the page
 
+Quote Post
bender
сообщение Nov 9 2006, 21:04
Сообщение #8


Grand Member
****

Группа: Members
Сообщений: 435
Регистрация: 27.8.2005
Пользователь №: 1993



Сейчас занялся делфи, и естественно появились вопросы. Не подскаже как при нажатии КНОПКИ сделать так, чтобы в том же окне появилась форма, где будет написан текст.
Спасибо заранее.
Go to the top of the page
 
+Quote Post
Renard
сообщение Nov 9 2006, 22:13
Сообщение #9


Junior Member
*

Группа: Members
Сообщений: 27
Регистрация: 25.3.2006
Пользователь №: 29373



Не понял точно про что ты...думаю так пойдет...на процедуру Tform1.Button1Click вешает ф-ю ShowMessage('Превед кросавчег')
Go to the top of the page
 
+Quote Post
bender
сообщение Nov 9 2006, 22:40
Сообщение #10


Grand Member
****

Группа: Members
Сообщений: 435
Регистрация: 27.8.2005
Пользователь №: 1993



не-а)) Чего не то.. Нужно, чтобы было сообщение не на новой форме, а на той, где находятся кнопки..
Go to the top of the page
 
+Quote Post
Renard
сообщение Nov 9 2006, 22:45
Сообщение #11


Junior Member
*

Группа: Members
Сообщений: 27
Регистрация: 25.3.2006
Пользователь №: 29373



Цитата(Bender28;24609)
Не подскаже как при нажатии КНОПКИ сделать так, чтобы в том же окне появилась форма, где будет написан текст.
Спасибо заранее.


Видимо я что то не понял...Кстати текст заранее известне, или ввести его должен ты?
Go to the top of the page
 
+Quote Post
bender
сообщение Nov 9 2006, 22:50
Сообщение #12


Grand Member
****

Группа: Members
Сообщений: 435
Регистрация: 27.8.2005
Пользователь №: 1993



Текст известный.
попытаюсь переформулировать...
Когда щелкаешь кнопку все что было на той форме удаляется и появляется известный текст.
Go to the top of the page
 
+Quote Post
Renard
сообщение Nov 9 2006, 22:52
Сообщение #13


Junior Member
*

Группа: Members
Сообщений: 27
Регистрация: 25.3.2006
Пользователь №: 29373



http://slil.ru/23380062 если это то, скажу как сделать..
Go to the top of the page
 
+Quote Post
bender
сообщение Nov 9 2006, 22:56
Сообщение #14


Grand Member
****

Группа: Members
Сообщений: 435
Регистрация: 27.8.2005
Пользователь №: 1993



перезалей на другой файлообменник плиз
не качет у меня со слила
Go to the top of the page
 
+Quote Post
@ндрюха!
сообщение Nov 10 2006, 22:08
Сообщение #15


Advanced Member
***

Группа: Members
Сообщений: 168
Регистрация: 13.9.2006
Пользователь №: 26251



Смари: кидаешь на форму label. В обработке события кнопки пишешь
label5.caption:=('ТУТА ТЕКСТ');
Если например у тебя на форме ужо есть label10 (или какойто там номер) точно так и указываеш
label потом номер . caption:=('ТУТ ТЕКСТ') ;
если чего в аську стучи :-)
Go to the top of the page
 
+Quote Post
Renard
сообщение Nov 11 2006, 17:08
Сообщение #16


Junior Member
*

Группа: Members
Сообщений: 27
Регистрация: 25.3.2006
Пользователь №: 29373



у мну в аккурат тож самое, ток он слить не может)))
Go to the top of the page
 
+Quote Post

Reply to this topicStart new topic
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



Текстовая версия Сейчас: 1st January 2025 - 18:01