не судите за,может быть,сильно легкий вопрос,но можно ли как то в делфи привязатся к командам из cmd?например выкл комп?
DimkO, ShellExecute из модуля ShellApi ShellExecute(Handle, 'open', 'cmd.exe', 'shutdown -s', nil, SW_SHOWNORMAL);
HKEY_CLASSES_ROOT\Directory Там создай папку shell В той папке папку с именем которое хочешь чтоб было в меню. Например Code: HKEY_CLASSES_ROOT\Directory\shell\ОЛОЛО!!! П.С В гугле этого полно.
Пример регистрирует расширение файла(.myext) - файлы этого типа будут открываться приложением MyApp.Exe. Также регистрируется одно действие (action) по умолчанию для файлов этого типа и два дополнительных пункта контекстного меню, связанного с этим типом файлов. Code: uses Registry; procedure TForm1.Button1Click(Sender: TObject); var R : TRegIniFile; begin R := TRegIniFile.Create(''); with R do begin RootKey := HKEY_CLASSES_ROOT; WriteString('.myext','','MyExt'); WriteString('MyExt','','Some description of MyExt files'); WriteString('MyExt\DefaultIcon','','C:\MyApp.Exe,0'); WriteString('MyExt\Shell','','This_Is_Our_Default_Action'); WriteString('MyExt\Shell\First_Action', '','This is our first action'); WriteString('MyExt\Shell\First_Action\command','', 'C:\MyApp.Exe /LotsOfParamaters %1'); WriteString('MyExt\Shell\This_Is_Our_Default_Action','', 'This is our default action'); WriteString('MyExt\Shell\This_Is_Our_Default_Action\command', '','C:\MyApp.Exe %1'); WriteString('MyExt\Shell\Second_Action', '','This is our second action'); WriteString('MyExt\Shell\Second_Action\command', '','C:\MyApp.Exe /TonsOfParameters %1'); Free; end; end;
если нужно качать целеком файл, то не нужно ничего придумывать UrlDownloadToFile есть. Если хотите изврата, то берете любой исходник для посылки HTTP запроса и приема данных. Тут их пару десятков есть. ТОлько данные приминаете и сразу кидаете в файла. насчет по частям - это зависит от того поддерживает это сервак или нет. Но всё это реализуется ввиде определенного поля в HTTP заголовке (Range)
У меня компоненты лежат на первой форме, сделал вторую форму написал код с компонентами первой теперь ругается.Что делать как привезать формы друг другу?
Unit Unit2; //Форма которая использует компоненты первой формы ... implementation uses Unit1; //Форма с компонентами Пример: Code: unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) Edit1: TEdit; private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} end. Code: unit Unit2; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm2 = class(TForm) procedure FormCreate(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form2: TForm2; implementation uses Unit1; {$R *.dfm} procedure TForm2.FormCreate(Sender: TObject); begin form1.edit1.text :='simple example'; end; end. Форма 2 при загрузке установит значение свойства text компонента edit1 в 'simple example'.
Сделал поиск по БД. Вот код: В общем мне надо сделать Поиск по номерму телелефона или фамилии.Так сказать телефонный справочник.Этот код просто указывает на найденную фамилию,как сделать чтоб результаты поиска выводились в другой BDgird и не только один вариант а несколько.Допустим Петров Ваня, Пестров Гоша ...
Наконец дошли руки задать вопрос 2 дня искал на него ответ но так и не нашет , знаю sin3v раньше на сайте своем писал как это делать но его сайт прикрыли. ну так к вопросу: сделал фейк на делфи рейтинга приходят на асю логи и пассы вот хочю его в билдер запихать а как это сделать незнаю вот прошу описать этот процесс либо хотьт сылку дать на инфу заранее спс!
Не давно начал заниматься дэлфи7 и воот уже появился жезненно важный вопрос, как сохранить написанную мной программу на ПК, тобиш запускаемую по двойному клику!! ps. не судите строго я новечек в этом деле
Сохраняешь проект то есть File--->Save Project as (сверху вкладки над вкладками компонентов), как сохранил запускай программу, как запустил она скомпилировалась и доступна по тому месту где ты сохранил проект! (имя файла будет Project.exe)
нее не, ты не понял... я иммею ввиду сохранение программы, а не проекта! т.е выполненный мною проект я хочу превратить в уже рабочию пусть и первую программку, которая запускается по двойному клику с расширением .exe
ОТВЕТТЕ ПЛЗ мне оч срочно надо !!! Наконец дошли руки задать вопрос 2 дня искал на него ответ но так и не нашет , знаю sin3v раньше на сайте своем писал как это делать но его сайт прикрыли. ну так к вопросу: сделал фейк на делфи рейтинга приходят на асю логи и пассы вот хочю его в билдер запихать а как это сделать незнаю вот прошу описать этот процесс либо хотьт сылку дать на инфу заранее спс!
т.е. тебе надо написать билдер на делфе? вот почитай мож пожет: http://forum.0day.kiev.ua/index.php?showtopic=118246&mode=threaded&pid=1404241
спс канеш но нес овсем там в Winhex описано как изменить текст а вот ф-ию отправки изменить там неописано не капли народ кто может помочь ?? с меня ++++!!!!
в паскале извлекаю квадратный корень из числа опертатором sqrt вот что получается sqrt(4)=2.0000000000000E+00 sqrt(100)=1.00000000000000+01 но ведь квадратный корень из 100 не 1 , а 10... как сделать так ,чтобы паскаль делил как обычный калькулятор, те. выделял целую часть??? ---------------------------------------- о все сам нашел
