Ребята.. я не умею в делфи ничего.. ща буду по гайдам делать небольшую фигню..
Подскажите пожалуйста..
Как мне создать приложение чтобы не было формы, чтобы оно просто выполнилось 1 раз и закрылось..?

там вроде выбираешь проект ... консольное приложение ... и он все сделает как надо

(1) а окно консоли?

У меня нет такого выбора :(
Есть только CLX Apllication

(0) Не обязательно консольный. Можешь просто создать проект - и _не_ создавать формы.

(3) Выкинь бяку. Используй более другие инструменты. Аналогов Delphi под линухами - их есть.

(2)я так понимаю, что выводить он все таки что-то должен ...

(4)Так она сразу создаётся же..
Удалить её? :) И ещё я не знаю в какой процедуре типа писать, если нет формы..
В форме можно же типа в "ПриОткрытии" написать всё что мне надо..а тут то как?

(7) там есть аналог модуля приложения, где собственно и создаются эти формы

Да я бы в CMD/BAT написал бы.. но там нет массива, и поиска по массиву..
А мне всего-лишь надо создать массив, занести в него данные постоянные..
А потом проверять, есть ли в каталоге файлы с наименованиями как в массиве и менять имя файла в зависимости от исходного..

(7)Есть.. это Project1

(7) Файл проекта открываешь. CreateForm - удаляешь. Наслаждаешься результатом.

(11)Спс..
Ща буду пробывать.. заходите на огонёк ко мне сюда :)

program Project1;

uses
  SysUtils;

begin
   //здесь пиши что тебе надо
end.

(Честно говоря - не понимаю, зачем использовать инструменты, которыми не умеешь пользоваться...)

(9) можно VBS скрипт написать. Обработка происходит абсолютно молча, можно даже консольные окна спрятать если какие-то приложения запускаешь

+ (9) массивы есть и масса всего прочего, и никаких дельфей не надо

Используй: http://autoit-script.ru/

(9) Честно говоря, не понял. Если это в Windows - то зачем использовать CLX?

(18) честно говоря, я не знаю зачем тут дельфя. Из пушки по воробьям. Скриптами такие вещи всегда делались

(18)Да я не юзаю CLX... про CLX это был ответ на то, что у меня нет выбора - Console Application... а есть только CLX

(14) Есть такие люди, которые создают себе трудности. И борятся с ними...

(19)ну как бы с VBS я вобще не знаком.. а про делфи пару видеоуроков глядел.. :)

(0)Дарю, обработку без формы :)
Delphi 6
http://yadi.sk/d/r3GbWMa7A8FFF

(14)Ок.. а если я ничем не умею пользоваться.. а мне надо сделать? Мне что не делать теперь? Что вы как маленькие.. сами прекрасно всё знаете, что каждый день приходится узнавать что-то новое..

(13) Спс

(22) там не трудно, это ж бейсик. У меня как раз подобные задачи когда по админке стали возникать - файло там какое по-хитрому найти и сархивировать, еще чего - за полдня разобрался, сразу и написал чего нужно.

(22) Офигеть... VBS - _проще_ Delphi. И _более адекватен_ задаче.
Ты ещё по "Армагеддону" бы поучился космические корабли пилотировать...

+(27) Выбирай инструмент по задаче. Прежде чем чего-то писать - познакомься, какие инструменты для таких задач имеются. А не "пару видеоуроков".
Всем нам приходится работать с _разными_ системами. Каждая из которых - для своих задач. И умение их выбирать - оно крайне необходимо.

+ (22) и еще один плюс VBS - скриптов готовых в сети полно на все случаи жизни, гуглятся запросто. Только успевай копипастить себе.

(28)я по винг командеру учился ... правда не знаю насколько реально освоил )))

(0) Автор раскрой задачу. (27) Delphi старый инструмент не советую.

+ (23) http://yadi.sk/d/FrmKNSOgA8GFt

Ок ок :) Ребята.. уговорили.. пойду гуглить про VBS

(31) Задача раксрыта в (9)

(31) Да ну, старый... Реально работающий. Но для данной задачи - я его тоже не советую.

(34) +100500

Можно было бы обработку из 1С в винде запускать.. не нужно было бы ничё :)

(33) набери в яндексе "vbs поиск файла". Узнаешь много интересного

(30) Я учился на ОС "Диспак", ОС ЕС и MCP :-)
И - каюсь - их до конца не освоил. Поскольку они устарели ещё до того :-)

А VBS уже научился с БД работать? В (9) есть что-то про постоянный массив - не факт что массив будет неизменен во веки веков, или, более того, не потребуется обновлять этот массив по итогам обработки...

(39) умеет через ADO. Делал.

(39) могу даже исходняк показать

(31)хера себе старая ... ХЕ5 вышла 11.09.2013

(36) Вот сейчас ты умные слова сказал! Если знаешь "1С" - то и используй "1С". Твоя задача - решить задачу. Какими средствами... Оптимизировать решение потом будешь. Сначала - реши.

(39) не знаю как насчет "научился", по-моему он всегда умел с COM-объектами работать. А через них можно делать практически все. Хоть XML, хоть БД, хоть черта лысого.

+(43) А обработку из 1С - запустить можно. Но, похоже, ты и 1С не знаешь... Печально...

http://delphi-insider.blogspot.com/2013/09/announcing-rad-studio-xe5-delphi-xe5.html

кстати ходят слухи, что дельфи теперь наш родной российский продукт ... и типа его ведут разработчики из офиса расположенного в Санкт-Петербурге

(44) Дык.. На мой непросвещённый взляд - как раз в этом-то и прикол, что умеет (и всю жизнь умел) работать.

(0) при открытии формы просто пишешь Форма.Скрыть
Выполняешь все сви действия и потом просто закрываешь приложение (через Форма.Закрыть)

(47) Интересно. А подробности - есть? А то б можно было с ребятами связаться...

(47) А чего это он стал Российским, если он мелкософту принадлежит? Или я чет пропустил?

(48)а разве не с версии 5.0 он начал поддерживать сом?

(51)он и близко никогда Майкрософт не принадлежал

(51) Я, видимо, что-то пропустил... С каких пор Delphi принадлежит Microsoft'у?
(Я не шучу, я правда некоторое время не следил за ситуацией. Переход разработчика - это не переход решения).

(53) Здрасти, мелкософт давно уже выкупил Борланд.

(50)wiki:Delphi_(среда_разработки)

(55)а ну как подробнее?

(55) Не, вру.

В конце 2002 года появились слухи о возможной покупке компании корпорацией Microsoft[2], однако сделка не состоялась, при этом, по неподтверждённым данным, в какой-то момент около 5 % уставного капитала Borland всё-таки принадлежало Microsoft[источник не указан 572 дня].

(52) Виноват. VB(чего-то там) - воспринимаю как VBx. Но суффиксы-то -  разные :-) Вот и...

(33) чо там гуглить из за трех строчек

(59) там у них еще в 2006 году что-то было...мутное с компанией, кто-то их перекупал

+(61)

program Project1;

uses
  SysUtils;

const
  Dir: string = 'c:\temp\';
  FileCount = 4;
var
  names1: array[1..FileCount] of string = ('file1.txt', 'file2.txt', 'file3.txt', 'file4.txt');
  names2: array[1..FileCount] of string = ('_file1.txt', '_file2.txt', '_file3.txt', '_file4.txt');

  i: integer;

begin
  for i := 1 to FileCount do
  begin
    if FileExists(Dir + names1[i]) then
      RenameFile(Dir + names1[i], Dir + names2[i]);
  end;
end.

(59)там не уставной капитал ... а именно часть акций ... говорят с правом голоса, что и заставило(ли) Borland вывести отдел по разработке средств разработки сперва в дочернее подразделение а потом и во все продать ... правда с продать тоже не все понятно ... как CodeGear разрабатывала ... так и разрабатывает ... правда вот владельцы CodeGear поменялись, но Майкрософт владельцем не стала

(63)Дак я так и хотел.. но они иеня уговаривают делать на VBS :(

(63)Спасибо тебе..
С этого примера сделаю всё..
С П А С И Б О !

(62)7-го мая 2008 года корпорация Borland объявила о продаже своей дочерней компании CodeGear Embarcadero Technologies

7-го мая 2008 года корпорация Borland объявила о продаже своей дочерней компании CodeGear - Embarcadero Technologies

(63) Вот это единственное что меня убивало в Делфи:

"
  FileCount = 4;
var
  names1: array[1..FileCount] of string = ('file1.txt', 'file2.txt', 'file3.txt', 'file4.txt');
"

Хотя можно и динамические массивы замутить :)

(69) чо тут такого убийственного?. так же как и во всех других языках.

(69) Извини, укажи, какое слово стояло перед FileCount=4
А динамические массивы на _этой_ основе - замутить не получится.

(71)+100 ... в лучшем случае цепочку объектов

(71) в (63)Полная версия ж

(71) ну можно и динамические массивы использовать. просто они здесь не нужны.

+(74) если у автора фиксированный набор имен файлов, накой тут динамические массивы?

(74) Можно. Но дело не в том, что их можно использовать (кстати, синтаксис был бы чуток другой). У меня возникло ощущение, что товарищ, замалчивая кой-какие детали, пытается выдать нечто желаемое за действительное.

(76)"товарищ, замалчивая кой-какие детали, пытается выдать нечто желаемое за действительное."

тыж гляди яка ссука :)

(73) Ключевое слово - "const".

(77) Уж извини, но ты и Pascal, и Delphi прекрасно знаешь. И понимаешь, что я имел в виду :-)

(79) если честно, я ничего не понял

(80) Там - const. Не знаю, как там в DelphiX (полагаю, что ничего не изменилось), но в предыдущих версиях Borland просто использовал текстовую подстановку "тела" константы (теоретически - абсолютно прав; практически - доходило до фигни полной, когда, к примеру, const X = 1/0;).
Механизм выделения памяти под массивы во фрейме подпрограммы - несколько отличается, в зависимости от того, выделяется ли память константного размера или зависит от чего-то там..

(70) убийственно то ,что нужно заранее указывать размерность массива. А знать ее заранее не всегда бывает возможно.

(71) С чего бы это "не получится". Очень даже получится...у меня же работает :)

+(81) На самом деле - уже знаю :-) Просто ранее не было повода проверять :-)

(82) Разные алгоритмы выделения памяти.

+(85) Спрошено лично у Вирта, если что :-)

(85) Естественно разные, а с чего им быть одинаковыми.

(87) Дружище... Делаю вывод - компиляторов ты не писал. (Это никоим образом не упрёк - все мы пишем те программы, которые нам заказывают. И на самом деле - мой тебе большой респект за многие комменты. Но - не за все).

(88) Нет, компиляторов не писал.

Объясняю. Если размер типа известен заранее (ни слова о .NET), то и размер выделяемой на стеке памяти - тоже заранее известен. (И его там можно зафиксировать).
Теперь предположим, что размер массива заранее не известен. В таком случае - два варианта. Либо это размер считывается из параметров (и на стеке выделяется _динамически_ соответствующая область). Либо - чхаем на это глубоко, и все динамические массивы размещаем в куче.

(82) А что есть в природе языки которые угадывают размер массива, который тебе понадобится? Ничего тут убийственного. Всё как у всех. Массивы статические, массивы динамические. Хош сам память выделяй под массивы, хош пользуйся встроенными возможностями. Ничего убийственного не вижу.

(90) чо ты голову людям морочишь. просто константу объявили и всё. при чем тут стек и компилятор.

(92) При том, что константа - это такая цифирь. Нет разницы между const N=4; с последующим использованием N и просто числом 4 (Мля... В некоторых языках - есть... Читатели, игнорируйте, пжалста, этот момент! Просто примите, что в Delphi - ну вот так сложилось. "Почему мы руки моем, а ноги - нет"). А "головы морочу" - я не морочу, я предпочитаю, чтобы люди понимали, почему так, а не иначе.

(90) Я реализовывал через кучу.

+(92) Это - к вопросу об использовании тех или иных инструментов. Вот сделали люди. Вот в Delphi - так сделали. Замечательно. В динамических языках - иначе. Тоже замечательно. Просто выбирайте инструмент, который нужен...

(93) не понимаю чего ты так хорохоришься. Это и Ёжику понятно, что

"Нет разницы между const N=4; с последующим использованием N и просто числом 4"

(94) Ну так и в Delphi - динамические массивы в куче лежат. Но у них в декларации переменной размер не задаётся.

(86) На самом деле - это особенность именно Delphi, в других компиляторах бывает и иначе.

(98) ага. а еще в других компиляторах нету слова BEGIN и END

как бы

(99)в паскале нету {} ... это плохо?

(101) это отвратительно
правда {} там есть, но всё равно отвратительно

(0) Создаешь приложение, закрываешь все формы без сохранения, код пишешь между begin и end в главное модуле (которы program). Вроде все.

Ребята.. ребята.. подскажите раз уж вы тут...

А есть в Delphi ключ и значение? :)

(104) Ассоциативный массив? В D7 не было.

(103)Спасибо, Серёж.. уже подсказал Кирпич..

(104)что ты под этим имел ввиду? ... структуру?

У меня D7
Блин.. Все хают 1С.. а в других системах ничего нет такого, что есть в 1С..

(107)Ну можно и структуру.. или же соответствие..

(104) я ж тебе готовую программу дал уже. накой тебе ключ и значение?
а так есть конечно.

(110)Ну не красиво же так :)
Два массива.. в одном ключ, в другом значение :)
Но за программу огромное спасииииииииибо!

издевается паразит

(112)Неет.. неет..
Не надо.. я так сделаю.. извини.. :(
Я просто спросил.. мой мозг просто привык к 1С уже.. вот и туплю сижу.. не могу воспринять другую прогу..

http://www.cyberforum.ru/delphi/thread550219.html

(114)Спс..

(111) В делфи массивы могут быть многомерными :)

(116) молчи! ты компиляторов не писал! (не был в Керчи)

пиши на асме

(118) на асТме :)

Не могу иконку сменить :(
Жму кароче - project-options-application

Там не активно всё о_О

(120)у как жалко

program Project1;

uses
  SysUtils;

{$R *.res} //подключить ресуры

создай другой проект. выбери в нем иконку. компильни и скопируй res файл в свою пуперпрограмму

(122) У меня всё это есть..

(123)Ок... попробую..

для верности переименуй свой res c иконкой (в myres.res например), скопируй в папку с пуперпрограммой и вместо {$R *.res} напиши {$R myres.res}

Видимо весь смак этой гипер проги именно в иконке :)

Если компиляторов не писал, это сложно осознать :(

Ребята.. ну зачем вы так? Давайте жить дружно.. в одной стране живём.. хватит сраца!

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

Rie писал

(129) Я писал. Как курсовую...

(131)да кто их не писал. кто учился, все писали.

Всё готово! Rename.exe ЙууХууу :)

(132)все ... правда 90% дальше эбаута не уходило

короче назрел вопрос о интерпритаторе языка 1с, на котором будут писать батники. ибо одинеснику не нужно ничего знать кроме одинеса.

интерпрЕтаторе. пардон.

сяду напишу чтобы пацаны не мучились больше с дельфями всякими

(133) покаж чо написал

(136) на ИС валялось несколько разработок по этой теме.

(139) пойду поищу

http://infostart.ru/public/18681/

вот есть вроде. но там .NET
а .NET это из пушки по воробьям

(141)это сейчас такие программеры пошли ... тыкают все галочки и аля компилить аплюхи по 3 гигабайта каждая

(141) Я пробовал эту штуку - мне не понравилось.

Так что пиши свою!

(142) напишут какую нибудь фигню, которая через интернет текстовый файлик отправляет. скачиваешь эту программу, размером в 140 мегабайт, устанавливаешь, запускаешь, а она выдает сообщение "неправильная строка с указанием класса "Excel.Application"" и падает.
Оказывается я дурак забыл купить офис.

(138)
program rename;

uses
  SysUtils;

{$R *.res}

const
  FileCount = 52;
var
  Dir: String;
  names1: array[1..FileCount] of string = ('????????.DBF', '????????.DBF', '???.DBF', '????????.DBF');
  names2: array[1..FileCount] of string = ('F4378001.DBF', 'F4378002.DBF', 'F4378003.DBF', 'F4378004.DBF');

  i: integer;

begin
  Dir := ExtractFileDir(ParamStr(0))+'\';
  for i := 1 to FileCount do
  begin
    if FileExists(Dir + names1[i]) then
      RenameFile(Dir + names1[i], Dir + names2[i]);
  end;
end.

Да ничё не написал... подменил твои названия файлов, ну и плюс за место статичной папки поставил папку из которой запускается программа..
В массивы добью оставшиеся 48 организаций.. и всё... можно будет юзать и таскать файл в банк в том виде, в котором они хотят.. вот :)

ну и ладушки

(9) В BAT/CMD есть массивы

(147) ну вот. ты всё испортил :)

(147)Да может и есть.. но только гуглить нужно пол дня чтобы сделать такую простую задачу..

(149)
Че там гуглить...
:: инициализировать 10 переменные вида arr.X случайными числами

for /l %%i in ( 0, 1, 9 ) do (
    set /a arr.%%i=!RANDOM!
)

(150)Видел эту ссылку..

Даю тебе 30 минут чтобы сделать то, что сделано в (145)..
Кирпич это сделал за 5 минут, если не меньше.