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

Вниз

помогите новичку (работа с ListBox)   Найти похожие ветки 

 
miracle_fox   (2003-12-29 16:51) [0]

здравствуйте, форумчане! вот уже второй день изучаю дэльфю, ясное дело накопились некоторые вопросы... вот например поставил я себе на форму ListBox1. очень нужно, чтобы при запуске моего приложения ListBox1 автоматически заполнялся из файла (например list.txt). как это сделать? и ещё вот: как сделать так, чтобы иметь возможность заполнять из дельфи мой файл list.txt при чём не отделной программой, а, например, чтобы при нажатии кнопочки
Button1, выскакивало отдельное окошко с label "введите новую строку" и edit"ом, куда вводить ... если знаете чем помочь - напишите в этот топик сообщение. заранее спасибо.


 
Ru   (2003-12-29 17:07) [1]

вроде: ListBox1.Items.LoadFromFile("...");

а второе: InputBox или InputDlg - не помню


 
Agent13   (2003-12-29 17:08) [2]

1.В Object Inspector на вкладке Events дважды щёлкаешь на OnCreate и пишешь:
ListBox1.Items.LoadFromFile("list.txt");

2. Создаёшь форму Form2 с лейблом и эдитом. В основной форме дважды щёлкаешь на свою кнопку и пишешь:

Form2.ShowModal;
Listbox1.Items.Add(Form2.Edit1.Text);


 
miracle_fox   (2003-12-29 17:11) [3]

а можно ли поточнее ... ? для меня это пока тёмный леззз :)


 
Palladin   (2003-12-29 17:13) [4]

темный лезз да осветится книгами о паскале и делфи...


 
Agent13   (2003-12-29 17:14) [5]

2Ru
>а второе: InputBox или InputDlg - не помню

Точно, так полегче будет: InputBox("ввод", "введите число", "");

2miracle_fox

Куда уж ещё точнее?


 
miracle_fox   (2003-12-29 17:15) [6]

мудрость мудростью, но не за 2 же дня! :))) кст, книгу какую посоветуете, люде :) ??? (на правах соцопроса)


 
KSergey   (2003-12-29 17:16) [7]

Любую! Серьезно.


 
Ru   (2003-12-29 17:26) [8]

>miracle_fox © (29.12.03 17:11) [3]

если есть толстый интернет, то, пока ума разума буш набираться, советую сайты:
http://podgoretsky.pri.ee/
http://www.delphiplus.org/ - можно сказать два равнозначных сайта, но на первом можно найти кое-какие тонкости, которые отсутствуют на втором. В основном содержимое этих сайтов это книги по дельфи и не только.
http://www.delphiworld.narod.ru/ - 3000 статей на различные тематики программирования в дельфи
http://www.delphikingdom.com/ - хороший сборник полезных статей
http://emanual.ru/ - книги
http://delphibase.endimus.com/
http://atrussk.ru/delphi/ - справочник по функциям API

для начала хватит.

PS ещё можно посмотреть куда идти тут:
http://deep.webm.ru/forum/reply.php?num=3.3&id=59799


 
miracle_fox   (2003-12-29 17:45) [9]

да. вы конечно ребята хорошие, но вижу, что занятые .... и всё же, если кто-то напишет код - буду благодарен. могу даже с новым годом поздравить (для мазахистов - утром первого :))


 
Agent13   (2003-12-29 17:55) [10]

Вот полностью код модуля, которорый тебе нужен. Разбирайся:

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;

type
TForm1 = class(TForm)
ListBox1: TListBox;
Button1: TButton;
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
begin
ListBox1.Items.LoadFromFile("list.txt");
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
ListBox1.Items.Add(InputBox("input", "type a string", ""));
end;

end.


 
Ru   (2003-12-29 17:57) [11]

>miracle_fox © (29.12.03 17:45) [9]

00. кладёшь на форму листбокс
01. обзываешь его
02. кликаешь левой клавишей мыши на форме
03. нажимаешь F11
04. вкладка event ищи событие OnShow
05. дважды кликаешь левой клавишей мыши
06. в создавшемся обработчике пишешь код: ListBox1.Items.LoadFromFile("list.txt"); вместо ListBox1 нужно прописать указаное тобою имя
07. нажимаешь F12
08. кладёшь на форму кнопку (какую нравится)
09. дважды кликаешь левой клавишей мыши на кнопку и пишешь код: ListBox1.Items.Add(InputBox("ввод", "введите число", ""));

если я не ошибся то так.


 
miracle_fox   (2003-12-29 17:59) [12]

спасибо огромное. тему можно считать закрытой.
Agent13: это ты что клюнул... на поздравление с новым годом? шучу:)


 
Agent13   (2003-12-29 18:00) [13]

Да не на поздравление я клюнул, просто я человек не занятой :)


 
miracle_fox   (2003-12-29 18:02) [14]

всех с наступающим! в новом году не будте суеверны. просто не переходите дорогу чёрным кошкам и бабам с пустым ведром (к сожалению выражение перешло к вам по средствам испорченного телефона:)



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

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

Наверх





Память: 0.48 MB
Время: 0.009 c
1-37645
Mike_forewer
2003-12-27 02:46
2004.01.13
Resource Editor


1-37794
succer
2003-12-28 04:53
2004.01.13
Как переустановить модуль forms.pas


14-37872
strupik
2003-10-10 17:47
2004.01.13
Компьютерные ИГРЫ и их будущее..


1-37644
Hyboid
2003-12-25 19:12
2004.01.13
DLL Strings


1-37713
Андреев
2003-12-29 20:32
2004.01.13
шаг для for





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский