Утилитa для сортировки файлов

@GreenPanda · Регистрация: 29.08.2010

Студворк — интернет-сервис помощи студентам

Вот зделал неболбшую утилиту для сортировки файлов )) хотелось бы узнать ваше мнение)
Только поменяте New folder на чтонить другое

@NiTan · 12.09.2011, 19:46

asen, ну так сделайте и выложите - мы и ее прокомментириуем.

@asen · 12.09.2011, 20:07

Хорошо, уже приступаю к разработке.
Кстати, посмотрите на мою программу, которую я сделал
Программа.
Можете её тоже покритиковать)

@GreenPanda · 12.09.2011, 20:14 **[ТС]**

Сообщение от asen

Честно, программа полный отстой...
Такую хрень может любой новичок сделать минут, этак минут за 30 максимум!

так в этом и есть дело я новичок

@Casper-SC · 12.09.2011, 22:01

У меня в последнее время сложилось впечатление, что эти программы никому нафиг не сдались. Ну написал одну, выложил. Покомментировали чуток и забыли, вторую вроде покрасивее и сложнее (ну по крайней мере я там для себя много нового открыл пока писал, чуть сильнее подучился строить архитектуру софта), так ту вообще не комментят, вроде 2 страницы и всё ушла в небытие.

У меня аж интерес пропал развивать первую прогу.

Сообщение от mischka

так в этом и есть дело я новичок

Советую хотя бы немного больше времени уделять интерфейсу. То есть его продуманности, хотя бы те же GroupBox'ы и т.д.

Добавлено через 1 минуту
А ну и пусть программа твоя будет на русском. Что за студия у тебя, что проблемы с русским языком? И какие вообще проблемы конкретно, а то слишком размыто звучит?

@GreenPanda · 12.09.2011, 22:30 **[ТС]**

Сообщение от Casper-SC

Советую хотя бы немного больше времени уделять интерфейсу. То есть его продуманности, хотя бы те же GroupBox'ы и т.д.
Добавлено через 1 минуту
А ну и пусть программа твоя будет на русском. Что за студия у тебя, что проблемы с русским языком? И какие вообще проблемы конкретно, а то слишком размыто звучит?

ну в будущем буду старатся делать более приятный и красивый интерфейс
проблемы таковы если запускаеш прогу на компе с не руской виндой то там всякие ероглифы

@Ciberst · 12.09.2011, 22:36

mischka, делай многоязычный интерфейс, для англичан - английский, для русских - русский, для германцев - германский

@GreenPanda · 12.09.2011, 22:43 **[ТС]**

Сообщение от Ciberst

mischka, делай многоязычный интерфейс, для англичан - английский, для русских - русский, для германцев - германский

сделаем

а вот как зделать так чтобы чекбоксы из ини файла грузились ?

@Casper-SC · 12.09.2011, 22:48

Я бы гуглил по: работа в delphi с ini
Собственно и нагуглил:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
procedure TForm1.FormDestroy(Sender: TObject);
var
  Ini: Tinifile; //необходимо создать объект, чтоб потом с ним работать
begin
  //создали файл в директории программы
  Ini:=TiniFile.Create(extractfilepath(paramstr(0))+'MyIni.ini');
  Ini.WriteInteger('Size','Width',form1.width);
  Ini.WriteInteger('Size','Height',form1.height);
  Ini.WriteInteger('Position','X',form1.left);
  Ini.WriteInteger('Position','Y',form1.top);
  Ini.Free;
end;

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
procedure TForm1.FormCreate(Sender: TObject);
var
  Ini: Tinifile;
begin
  //открываем файл
  Ini:=TiniFile.Create(extractfilepath(paramstr(0))+'MyIni.ini');
  Form1.Width:=Ini.ReadInteger('Size','Width',100);
  //последнее значение (100) это значение по умолчанию (default)
  Form1.Height:=Ini.ReadInteger('Size','Height',100);
  Form1.Left:=Ini.ReadInteger('Position','X',10);
  Form1.Top:=Ini.WriteInteger('Position','Y',10);
  Ini.Free;
end;

P.S. Я не отсылаю в гугл и т.д. Я высказал своё мнение, так что правила не нарушаю (просто уже "страшно" упоминать любой поисковик).

@GreenPanda · 12.09.2011, 23:07 **[ТС]**

Сообщение от Casper-SC

Я бы гуглил по: работа в delphi с ini
Собственно и нагуглил:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
procedure TForm1.FormDestroy(Sender: TObject);
var
  Ini: Tinifile; //необходимо создать объект, чтоб потом с ним работать
begin
  //создали файл в директории программы
  Ini:=TiniFile.Create(extractfilepath(paramstr(0))+'MyIni.ini');
  Ini.WriteInteger('Size','Width',form1.width);
  Ini.WriteInteger('Size','Height',form1.height);
  Ini.WriteInteger('Position','X',form1.left);
  Ini.WriteInteger('Position','Y',form1.top);
  Ini.Free;
end;

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
procedure TForm1.FormCreate(Sender: TObject);
var
  Ini: Tinifile;
begin
  //открываем файл
  Ini:=TiniFile.Create(extractfilepath(paramstr(0))+'MyIni.ini');
  Form1.Width:=Ini.ReadInteger('Size','Width',100);
  //последнее значение (100) это значение по умолчанию (default)
  Form1.Height:=Ini.ReadInteger('Size','Height',100);
  Form1.Left:=Ini.ReadInteger('Position','X',10);
  Form1.Top:=Ini.WriteInteger('Position','Y',10);
  Ini.Free;
end;

P.S. Я не отсылаю в гугл и т.д. Я высказал своё мнение, так что правила не нарушаю (просто уже "страшно" упоминать любой поисковик).

да как работать с ини я знаю а вот как зделать так чтобы при запуске проги она брала количество и имена чекбоксов и их потом на форме выводила

@Ciberst · 12.09.2011, 23:30

Не по теме:

Сообщение от mischka

зделать

уж, извините, но не могли бы вы писать "сделать"

@GreenPanda · 12.09.2011, 23:57 **[ТС]**

Сообщение от Ciberst

Не по теме:

уж, извините, но не могли бы вы писать "сделать"

извеняюс на руском не так часто писать приходится а в росии учился толко в первом класе учусь как могу :/

@GreenPanda · 13.09.2011, 01:10 **[ТС]**

у меня получяется вот такая проблема с groupboxами как исправить ?

@GreenPanda · 13.09.2011, 01:46 **[ТС]**

Вот версия с руским немецким и англиским +добавил gruopboxы и функцию где сортировать

@Ciberst · 13.09.2011, 08:58

WinXP SP3ю Как видим русский язык коряво отображается.

Не по теме:

Ваше приложение создает две формыО_о??? одна из которых прозрачна?

@GreenPanda · 13.09.2011, 14:18 **[ТС]**

Сообщение от Ciberst

WinXP SP3ю Как видим русский язык коряво отображается.

Не по теме:

Ваше приложение создает две формыО_о??? одна из которых прозрачна?

ну одна formа инфо а другая main а как узнать что две формы а одну не видно o0
а насчет языка это токая фигня происходит если labelы и типо таво называть по руски через сам делфи а не вписывать в код
label1.caption:='ляляля'
шяс исправлю

@Ciberst · 13.09.2011, 14:24

Не по теме:

Сообщение от mischka

ну одна formа инфо а другая main а как узнать что две формы а одну не видно o0

ну, я программу выложил в соседней теме, вот через нее и видно, что вторая форма спрятана от глаз.

Добавлено через 1 минуту
не увидел флаг Англии или США

@GreenPanda · 13.09.2011, 14:24 **[ТС]**

Вот исправил

@Ciberst · 13.09.2011, 14:30

Сообщение от mischka

Вот исправил

абракадабра исправлена
опять же

Сообщение от Ciberst

не увидел флаг Англии или США

@GreenPanda · 13.09.2011, 14:33 **[ТС]**

Сообщение от Ciberst

Не по теме:

ну, я программу выложил в соседней теме, вот через нее и видно, что вторая форма спрятана от глаз.

Добавлено через 1 минуту
не увидел флаг Англии или США

ну зачем програма изначялно на англиском а если надо другой язык тогда кликаем
ну если надо я добавлю англиский

@Ciberst · 13.09.2011, 14:35

Сообщение от mischka

ну зачем програма изначялно на англиском а если надо другой язык тогда кликаем ну если надо я добавлю англиский

ну тогда, вопрос "как перейти обратно на английский?"

Новые блоги и статьи Все статьи Все блоги /
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .
Оттачиваю умение писать js программы. russiannick 30.08.2026 Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .	мат медиц модель 30. презентация проекта anaschu 27.08.2026 хоп хоп хоп хидахоп, а я кладую))	Как у меня протекала болезнь zorxor 27.08.2026 Здравствуйте, друзья! Эта запись блога предназначена именно для вас - для моих дорогих друзей, которые знали меня лично. Чтобы ответить на вопрос - а что же со мной произошло на самом деле? Я учился. . .	Нашел вот забавное видео о измерениях. Лучшее что я видел на эту тему kumehtar 26.08.2026 ILETXiw9bMQ Основная суть и тезисы по измерениям: 0D (Нулевое измерение): точка, не имеющая длины, ширины, высоты или объема. Объект не может перемещаться в 0D. 1D (Первое измерение):. . .

@NiTan Покинул форум 3189 / 1368 / 109 Регистрация: 29.01.2010 Сообщений: 2,887
	12.09.2011, 19:46
	asen, ну так сделайте и выложите - мы и ее прокомментириуем. 0

@asen Заблокирован
	12.09.2011, 20:07
	Хорошо, уже приступаю к разработке. Кстати, посмотрите на мою программу, которую я сделал Программа. Можете её тоже покритиковать) 0

@Ciberst 559 / 436 / 21 Регистрация: 16.12.2010 Сообщений: 953
	12.09.2011, 22:36
	mischka, делай многоязычный интерфейс, для англичан - английский, для русских - русский, для германцев - германский 0

@GreenPanda 178 / 29 / 3 Регистрация: 29.08.2010 Сообщений: 228
	13.09.2011, 01:10 [ТС]
	у меня получяется вот такая проблема с groupboxами как исправить ? Миниатюры 0

@Ciberst 559 / 436 / 21 Регистрация: 16.12.2010 Сообщений: 953
	13.09.2011, 08:58
	WinXP SP3ю Как видим русский язык коряво отображается. Не по теме: Ваше приложение создает две формыО_о??? одна из которых прозрачна? Миниатюры 0