Вопросы по Delphi/Pascal

[MSeryoga]

MBZero,
Tquery представляет собой датасет, попробуй сделать что-то типа:
код

query2.Sql.Clear;
query2.Sql.Add('select фамилия as "фамилия" from db');
query2.Open;
while not query2.Eof do begin
edit1.text:=query2.FieldByName('фамилия').AsString ; //строка из столбца фамилия
query2.Next;
end;

Только в while надо менять edit1, edit2 и т.д.

[kettle]

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

[MSeryoga]

kettle, используй функцию random. Она генерит случайное число от 0 до 1. Если <0.5 тогда отображается 1 картинка, иначе - вторая. Смену картинок можно производить с помощью таймера... потом я не совсем понял, что надо... Надо определять участок пересечения на всем мониторе или только в окне программы?

[sergiyko]

Ochen nado DELPHI5

[REAL_XLD]

Подскажите как выплнить процедуру в фоне? На форму должны выводиться данные во время работы поцедуры, и форма не должна висеть.

[MSeryoga]

Цитата: Сообщение от REAL_XLD Подскажите как выплнить процедуру в фоне? На форму должны выводиться данные во время работы поцедуры, и форма не должна висеть.

Запустить в отдельном потоке...

[REAL_XLD]

Цитата: Запустить в отдельном потоке...

2 вопрос. Как?

[MSeryoga]

Сначала попробуй добавить в цикл:
Application.ProcessMessages;

Если не поможет, посмотри тут про потоки:
http://articles.org.ru/cfaq/index.ph...mostrecent=yes
или в Google

[REAL_XLD]

Цитата: Application.ProcessMessages;

Помогает, но тормозит... Хотя с меня наверно пока хватит.

А вот потоки чт-то не пашут... вроде все так сделал.

[ITiunov]

В Delphi7 если при очень частой перересовке какого-нибудь изображения (напр. во время вождения мыши) изображение начинает мерцать (типа тормозит) тем не менее процессор в это время вообще не напрягается. Под XP его можно заставить работать нормально включив полупрозрачность окна, а как сделать это под vist'ой.

[f0w14]

Цитата: Сообщение от ITiunov В Delphi7 если при очень частой перересовке какого-нибудь изображения (напр. во время вождения мыши) изображение начинает мерцать (типа тормозит)

Попробуй установить свойство DoubleBuffered:= True у мерцающего компонента. Если этого свойства у компонента нет (например, у TPaintBox), то установи его у родительского компонента (например, Panel1.DoubleBuffered:= True);

Добавлено через 8 минут

Цитата: Сообщение от Falco Не давно начал изучать Delphi. Возник вопрос. Что такое типизированные и нетипизированные файлы?

Отправляю на замечательный сайт "Королевство Дельфи". Цикл статей, посвященный работе с файлами в Delphi

http://www.delphikingdom.ru/lyceum/seminar.asp?id=2

Добавлено через 14 минут

Цитата: Сообщение от MBZero Что нужно сделать на делфи чтобы дапустим при нажатии кнопки(Button) на форме создавался компонент?

procedure TForm1.Button1Click(Sender: TObject);
var
CB: TCheckBox;
begin
CB:= TCheckBox.Create(Self);
CB.Parent:= Self;
CB.Left:= 10;
CB.Top:= 10;
CB.Width:= 150;
CB.Caption:= 'Это новый TCheckBox';
CB.OnClick:= MyCheckBoxClick;
end;

где MyCheckBoxClick - процедура обработки нажатия на CheckBox

procedure TForm1.MyCheckBoxClick(Sender: TObject);

Удалять созданный чекбокс будет сама форма (т.к. Owner у TCheckBox указан Self - это форма). Поэтому код будет работать без утечек памяти. Если бы в коде создавался невизуальный компонент, например, TStringList, то после работы с ним необходимо было бы его удалять (как правило, в декструкторе формы, если список используется формой).

[sergiyko]

Цитата: Сообщение от sergiyko Ochen nado DELPHI5

Прошу по русски, может у кого нибудь есть 5-я версия делфи, выложите на рапиду ПОЖАЛУЙСТА

[Ps_b]

Подскажите, плиз, как сделать, чтобы при разворачивании/сворачивании формы, DBGrid тоже менял размер с формой . Спасибо.

[andalussi]

Как в Delphi программно отключить/включить устройство, нампример аудиокарту? Подскажите, плииз....

[MBZero]

Цитата: Сообщение от Ps_b Подскажите, плиз, как сделать, чтобы при разворачивании/сворачивании формы, DBGrid тоже менял размер с формой . Спасибо.

Можно вот так:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
If windowstate=wsmaximized then
begin
DBGrid1.Width:=1000;
DBGrid1.Height:=500;
Timer1.Enabled:=false;
Timer2.Enabled:=true;
end;
end;

procedure TForm1.Timer2Timer(Sender: TObject);
begin
If windowstate=wsnormal then
begin
DBGrid1.Width:=511;
DBGrid1.Height:=139;
Timer1.Enabled:=true;
Timer2.Enabled:=false;
end;
end;

Незабудь только таймера два поставить. Причём во втором указать начальные размеры DBGrid-а которые тебе нужны а в первом указать размеры при разворачивании.