Загрузки документов и установки прог

@095 · Регистрация: 04.12.2007

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

Я какобычно думаю что мне "связывацца не предстоит", ога = )))
Можт кто расскажет что такое за среда "Установка программы" и где такое вопще можно надыбать?? Чтобы юзр получая пакетик моей проги смог установить все файлы (навороченный setup.exe там и тд)

И второе : как научить прогу прописывать/регить свои файлы в системе?

И самое главное: Есть опендиалог/сейвдиалог, А как сделать механизм чтобы я не из проги загружал файл а просто нажимал на нужный файл и вылетала прога с ним???

Так много бреда птшто почемуто я уверен что на каждый пункт по строке коду .. Вы это в технарях/институтах проходили небось, вам хорошо .......

Vourhey · 12.12.2007, 15:56

Все, что мы проходили в технарях, это Си и Паскаль под ДОС. А институтов, академиев мы еще и не заканчивали

Для написания пакетов установщиков можно использовать InstallShield.
Смотря что понимать под регистрацией. Если нужно, чтобы твоя прога открывала файл при двойном щелчке на его значке, то нужно сопоставить расширение этого файла с твоей программой в реестре. Это делается в HKEY_CLASSES_ROOT.

@095 · 12.12.2007, 16:06 **[ТС]**

охо я т думал у тя вышка = ))

С реестром работу поищщщу ...... чтоб он забивалсо программно ..

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

у тя остались какиенить коды к этой батве??

Vourhey · 12.12.2007, 16:17

Когда ты два раза щелкаешь на иконке, если твоя прога сопоставлена с расширением, то полное имя (имена) файла пердается в качестве параметра командной строки. Я се когда-то че-то писал, типа, многостраничного редактора, вот откопал:

Code
1
2
3
4
5
6
7
8
9
10
 begin
      reg.RootKey := HKEY_CLASSES_ROOT;
      reg.OpenKey('.txt', false);
      keystr := reg.ReadString('');
      reg.closekey;
      reg.OpenKey(keystr+'\shell\open\command', false);
      reg.WriteString('lastvalue', reg.ReadString('')); 
      reg.WriteExpandString('', application.ExeName+' %1');
      reg.CloseKey;
  end

;
А потом все это считывалось:

Code
1
2
3
4
5
6
7
8
9
10
begin    shgetfileinfo(pchar(paramstr(i)), FILE_ATTRIBUTE_NORMAL, finfo, sizeof(finfo), 
    SHGFI_DISPLAYNAME);
    TabControl1.Tabs.Add(string(finfo.szDisplayName) + lowercase(extractfileext(paramstr(i))));
    getfullpathname(pchar(string(finfo.szDisplayName) + lowercase(extractfileext(paramstr(i)))), 
    MAX_PATH, e, n);
    tabindex:=FileList.Add(e);
    TabControl1.TabIndex:=tabindex;
    memo1.Lines.LoadFromFile(paramstr(i));
    statusbar1.Panels[3].Text := filelist.Strings[tabcontrol1.tabindex];
  end

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

@095 · 12.12.2007, 16:40 **[ТС]**

Тоесть
Первая часть - это принудительное действие инсталлера либо тупо поиск соответствия с помощью виндовс

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

@095 · 12.12.2007, 16:42 **[ТС]**

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

@095 · 12.12.2007, 16:51 **[ТС]**

Уууу как просто = )))))))
Тупо ShowMessage(paramstr(1)); все показывает = ))))))))))))))))

Vourhey · 12.12.2007, 16:53

Все показывает? Опять ничем не подкрепленная уверенность. За нее ты когда-нибудь поплатишься. Когда твоя прога слетит на чужой машине.

@095 · 12.12.2007, 17:00 **[ТС]**

Вощм промессагил все какиетоко возможно файлы запиханные во всевозможные задницы - Никаких сокращений к путям файлов не наблюдал...! тут не понял о чем ты

А так - сделаю чтобы прога проверяла сначала своё местонахождение (есть дирлистбокс, возмем его директори при загрузки программы) а потом читала парамкоунт, и каждый параметр (если буду делать вгрузку 100 файлов, а вдруг = ))

Помоему таг?

@095 · 12.12.2007, 17:01 **[ТС]**

и имя файла было ed eerwf rwr rkdh akshfkjhf kdhdkjfhdsklfjh slkdfhed eerwf rwr rkdh akshfkjhf kdhdkjfhdsklfjh slkdfhed eerwf rwr rkdh akshfkjhf kdhdkjfhdsklfjh slkdfh.d

@095 · 12.12.2007, 17:04 **[ТС]**

ну в любом случае пожара не будет оттого что припишу в качестве перепроверки:

Code
1
getfullpathname(pchar(string(finfo.szDisplayName) + lowercase(extractfileext(paramstr(i)))),

Vourhey · 12.12.2007, 17:23

Хех. Гэтфулпаснэйм возвращает полный путь. Но не факт, что этот путь будет не сокращенным. Полный путь может быть сокращенным, а может быть и нет. Делай, как считаешь нужным. Я делал так, что он на любой машине будет иметь человеческий вид.
Пожара не будет в любом случае. Но надо стараться любые ситуации предугадать.

@095 · 12.12.2007, 17:58 **[ТС]**

Кстати а мож поподробней о Гэтфулпаснэйм??

getfullpathname(pchar(string(имя файла, этпонятна) (запятая) а эт че? (запятая) а это??? (запятая) А Это ????);

Vourhey · 12.12.2007, 18:18

Имя файла, длина буфера, указатель на буфер, адрес указывающий на имя файла в буфере. К слову, все эти функции описаны в разделе WinSDK дельфийского хелпа.

@095 · 12.12.2007, 18:30 **[ТС]**

Дельфийский хелп у меня не отображает даже getfullpathname в поиске (включил разделы без названий), зачем он нужен я досихпор не панял , Толи я еще не дорос чтобы это пользовать

Туда вопще нелазию - если че и найдется - то только написано что это красивая функция и чтобы такого она делала, и всё = )) ни синтаксиса ни примеров

Vourhey · 12.12.2007, 18:38

У дельфийского хелпа несколько разделов. WinSDK описывает WINAPI функции. Нет синтаксиса? А описание имени функции и ее параметров, к твоему сведению, и есть синтаксис. Для ее вызова знать больше ничего не нужно. Примеры? Для WINAPI там нет примеров. Да и зачем они нужны, когда все описано. Какая функция, что делает. Просто используешь и все. Если б для каждой функции да по примеру, то это было бы очень много и никому не нужно.

Новые блоги и статьи Все статьи Все блоги /
Первый деплой lagorue 16.01.2026 Не спеша развернул своё 1ое приложение в kubernetes. А дальше мне интересно создать 1фронтэнд приложения и 2 бэкэнд приложения развернуть 2 деплоя в кубере получится 2 сервиса и что-бы они. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит: токи, напряжения и их 1 и 2 производные при t = 0;. . .	Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .	Изучаю kubernetes lagorue 13.01.2026 А пригодятся-ли мне знания kubernetes в России?
Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/	WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .	Classic Notepad for Windows 11 Jel 10.01.2026 Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .	Почему дизайн решает? Neotwalker 09.01.2026 В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .

@095 0 / 0 / 1 Регистрация: 04.12.2007 Сообщений: 168

	Загрузки документов и установки прог 12.12.2007, 14:16. Показов 3201. Ответов 15 Метки нет (Все метки) Я какобычно думаю что мне "связывацца не предстоит", ога = ))) Можт кто расскажет что такое за среда "Установка программы" и где такое вопще можно надыбать?? Чтобы юзр получая пакетик моей проги смог установить все файлы (навороченный setup.exe там и тд) И второе : как научить прогу прописывать/регить свои файлы в системе? И самое главное: Есть опендиалог/сейвдиалог, А как сделать механизм чтобы я не из проги загружал файл а просто нажимал на нужный файл и вылетала прога с ним??? Так много бреда птшто почемуто я уверен что на каждый пункт по строке коду .. Вы это в технарях/институтах проходили небось, вам хорошо ....... 0

Vourhey Почетный модератор 7393 / 2639 / 281 Регистрация: 29.07.2006 Сообщений: 13,696
	12.12.2007, 15:56
	Все, что мы проходили в технарях, это Си и Паскаль под ДОС. А институтов, академиев мы еще и не заканчивали Для написания пакетов установщиков можно использовать InstallShield. Смотря что понимать под регистрацией. Если нужно, чтобы твоя прога открывала файл при двойном щелчке на его значке, то нужно сопоставить расширение этого файла с твоей программой в реестре. Это делается в HKEY_CLASSES_ROOT. 0

@095 0 / 0 / 1 Регистрация: 04.12.2007 Сообщений: 168
	12.12.2007, 16:06 [ТС]
	охо я т думал у тя вышка = )) С реестром работу поищщщу ...... чтоб он забивалсо программно .. А как понаставлял расширения тупо из свойств папки - то тутже посыпались ошибки ..... путь постоянно не находит +вспомнил что прога сама файл не открывает таким способом (кадат делал текстовый редактор - он тупо вгружался какбудто просто я на .exe нажал, и ниче ессно не показывал) у тя остались какиенить коды к этой батве?? 0

@095 0 / 0 / 1 Регистрация: 04.12.2007 Сообщений: 168
	12.12.2007, 16:40 [ТС]
	Тоесть Первая часть - это принудительное действие инсталлера либо тупо поиск соответствия с помощью виндовс а вторую часть делаем ручками затрагивая токо опендиалог да? без тупого прописывания в проге переменных где оно (программко) и они (доки) находятся да? и все сразу становица мобильным и красивым да? 0

@095 0 / 0 / 1 Регистрация: 04.12.2007 Сообщений: 168
	12.12.2007, 16:42 [ТС]
	тфуты .. затрагивая не опен диалог а форм креатие штоль щас попробую допиреть ............... 0

@095 0 / 0 / 1 Регистрация: 04.12.2007 Сообщений: 168
	12.12.2007, 16:51 [ТС]
	Уууу как просто = ))))))) Тупо ShowMessage(paramstr(1)); все показывает = )))))))))))))))) 0

Vourhey Почетный модератор 7393 / 2639 / 281 Регистрация: 29.07.2006 Сообщений: 13,696
	12.12.2007, 16:53
	Все показывает? Опять ничем не подкрепленная уверенность. За нее ты когда-нибудь поплатишься. Когда твоя прога слетит на чужой машине. 0

@095 0 / 0 / 1 Регистрация: 04.12.2007 Сообщений: 168
	12.12.2007, 17:00 [ТС]
	Вощм промессагил все какиетоко возможно файлы запиханные во всевозможные задницы - Никаких сокращений к путям файлов не наблюдал...! тут не понял о чем ты А так - сделаю чтобы прога проверяла сначала своё местонахождение (есть дирлистбокс, возмем его директори при загрузки программы) а потом читала парамкоунт, и каждый параметр (если буду делать вгрузку 100 файлов, а вдруг = )) Помоему таг? 0

@095 0 / 0 / 1 Регистрация: 04.12.2007 Сообщений: 168
	12.12.2007, 17:01 [ТС]
	и имя файла было ed eerwf rwr rkdh akshfkjhf kdhdkjfhdsklfjh slkdfhed eerwf rwr rkdh akshfkjhf kdhdkjfhdsklfjh slkdfhed eerwf rwr rkdh akshfkjhf kdhdkjfhdsklfjh slkdfh.d 0

Vourhey Почетный модератор 7393 / 2639 / 281 Регистрация: 29.07.2006 Сообщений: 13,696
	12.12.2007, 17:23
	Хех. Гэтфулпаснэйм возвращает полный путь. Но не факт, что этот путь будет не сокращенным. Полный путь может быть сокращенным, а может быть и нет. Делай, как считаешь нужным. Я делал так, что он на любой машине будет иметь человеческий вид. Пожара не будет в любом случае. Но надо стараться любые ситуации предугадать. 0

@095 0 / 0 / 1 Регистрация: 04.12.2007 Сообщений: 168
	12.12.2007, 17:58 [ТС]
	Кстати а мож поподробней о Гэтфулпаснэйм?? getfullpathname(pchar(string(имя файла, этпонятна) (запятая) а эт че? (запятая) а это??? (запятая) А Это ????); 0

Vourhey Почетный модератор 7393 / 2639 / 281 Регистрация: 29.07.2006 Сообщений: 13,696
	12.12.2007, 18:18
	Имя файла, длина буфера, указатель на буфер, адрес указывающий на имя файла в буфере. К слову, все эти функции описаны в разделе WinSDK дельфийского хелпа. 0

@095 0 / 0 / 1 Регистрация: 04.12.2007 Сообщений: 168
	12.12.2007, 18:30 [ТС]
	Дельфийский хелп у меня не отображает даже getfullpathname в поиске (включил разделы без названий), зачем он нужен я досихпор не панял , Толи я еще не дорос чтобы это пользовать Туда вопще нелазию - если че и найдется - то только написано что это красивая функция и чтобы такого она делала, и всё = )) ни синтаксиса ни примеров 0

Vourhey Почетный модератор 7393 / 2639 / 281 Регистрация: 29.07.2006 Сообщений: 13,696
	12.12.2007, 18:38
	У дельфийского хелпа несколько разделов. WinSDK описывает WINAPI функции. Нет синтаксиса? А описание имени функции и ее параметров, к твоему сведению, и есть синтаксис. Для ее вызова знать больше ничего не нужно. Примеры? Для WINAPI там нет примеров. Да и зачем они нужны, когда все описано. Какая функция, что делает. Просто используешь и все. Если б для каждой функции да по примеру, то это было бы очень много и никому не нужно. 0