[ Delphi / Pascal ] — начинающим: задаем вопросы (архивная - 2015)

Забей слова в базу данных, выводи DBGrid`ом. Для поиска юзай Locate

 

А как забить слова в базу данных и использовать эту базу?

 

скажите, как определить при помощи делфи имя компьютера?

 

^

Code:

function CompName:string;
var nSize:Cardinal;
begin
nSize:=MAX_COMPUTERNAME_LENGTH+1;
SetLength(Result,nSize);
GetComputerName(@Result[1],nSize);
SetLength(Result,nSize);
end;

 

Всем привет. Хотелось бы узнать как можно реализовать следующее:
допустим у нас есть основная форма и дополнительная;
на доп. форме хранятся настройки для основной.Как сделать так чтобы они(настройки) сохранялись в файл, либо реестр(подскажите что лучше) и после повторного запуска программы все настройки загружались из нужного нам места.
Может статейка какая есть или еще что.

 

^
тык

 

Доброго времени суток всем.
Вот работаю с компанентом TWebBrowser и столкнулся со следующей проблемой:
нужно на загруженной странице с несколькими фреймами найти текст, например "Hello world", и если он отсутствует(ну или присутствует), то выполнить какое-либо действие, например ShowMessage('123');
Заранее спасибо-)

 

Есть простое приложение на делфи, без формы и консоли....короче работает в скрытом режиме
А теперь вопрос....как узнать handle этого приложение...просто не хочеться подгружать модуль forms и использовать Application.Handle, так как это увеличит размер программы...
Что можете предложить в моем случае? Как лучше это сделать?

 

hHandle:= GetModuleHandle(nil);

 

Юзаю функцию pos .

 

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

 

По твоему вопросу сразу понятно что ты нюб)))

Но я отвечу на твой вопрос. Обьяви глобальную переменную и ей присвой результат!

 

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

 

а происходит ли вообще событие? код в студию.

 

Все прекрасно работает!

Code:

unit Unit1;

interface

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

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

var
  Form1: TForm1;
  s:string;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
s:='string';
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
ShowMessage(s);
end;

end.

 

Artist, странно, но твой код тоже не работает, где можно скачать делфи 10?

 

Как не работает?

Кидаешь на форму 2 TButton.
Жмешь на Button1 он присваивает перменной s(тип string) строку "string", жмешь на button2 он её выводит в showmessage.
Если нажать на button2 сразу то showmessage будет пустой.
Или ты что-то другое имел в виду?

Делфи 2010 называется CodeGear RAD Studio 2010, там полный пакет включая и С++builder 2010. Его можно скачать с любого торента.

 

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

Собственно вопрос: Как сделать так чтобы мышка не выходила за пределы ScrollBox, а вместо этого в ScrollBox появлялась бы полоса прокрутки и далее мышка фактически стояла бы на месте, а компонент бы прокручивался. Это позволило бы передвигать Image в нужное место легко и удобно.

Надеюсь вы меня поняли=)

 

подскажите пожалуйста, как сделать активацию по email?
т.е я пишу спамера, постинг и т.д сделал.. регистрацию сделал.. но на некоторых форумах нужно активировать аккаунт на email.. как лучше активацию сделать?

 

и еше просьба, дайте пример кода как прокси подключить для idHTTP1