Вопрос по Delphi

[Hamster]

Ответ: Помощь по Delphi

memo2.Lines.Append(....)

Я ж говорю, что такой вариант с добавлением строк не катит.

 

[Kuron]

Ответ: Помощь по Delphi

Ломовской вопрос....

for i:=0 to (memo1.lines.count-1) do
memo2.Lines:=(floattostr(strtoint (memo1.Lines)/max));

ето часть небольшой программки. Нужно просто заполнить строки компонента мемо2 строками мемо1, поделиными на число МАХ. ВСЕ!

Дело в том, что заполняются только 2 первых строчки компонента мемо2.
Остальные почемуто не хотят. Как с етим боротся?

зы при использывании команды memo2.lines.add(........) все работает, но такой вариант мне не катит.

Дело в том что у тебя в мемо всего две строки первоначально остальніе нужно добавить, т.е.
memo1.lines.count >(memo2.lines.count=2)
Нужно исп-ть метод .lines.Add (вроде так назівается) т.е. гдето так
memo2.Clear;
for i:=0 to (memo1.lines.count-1) do
memo2.Lines.Add:=(floattostr(strtoint (memo1.Lines)/max));

 

[Hamster]

Ответ: Помощь по Delphi

Дело в том что у тебя в мемо всего две строки первоначально остальніе нужно добавить, т.е.
memo1.lines.count >(memo2.lines.count=2)
Нужно исп-ть метод .lines.Add (вроде так назівается) т.е. гдето так
memo2.Clear;
for i:=0 to (memo1.lines.count-1) do
memo2.Lines.Add:=(floattostr(strtoint (memo1.Lines)/max));

Короче, я так понял, нужно прописовать memo2.lines.Add , сколько мне неужно раз.
Но ето мне помогло:
memo2.Clear;

Спасибо огромное!

 

[Piton]

Ответ: Помощь по Delphi

народ подскажите код для сворачивания програмы в сис трэй.
Заранее спасибо!!!

Вот код который сворачивает программу:

Application.Minimize;

 

[SoLar]

Ответ: Помощь по Delphi

сворачивания програмы в сис трэй Ключевая фраза.
Это ведь Delphi, компонентов для этого море...

 

[BrUTal]

Ответ: Помощь по Delphi

народ подскажите код для сворачивания програмы в сис трэй.
Заранее спасибо!!!

RxTools Copmponents

 

[Hamster]

Ответ: Помощь по Delphi

Ето выставляеться в свойствах формы.
Точно где - не помню=(

 

[Merlіn]

Ответ: Помощь по Delphi

Пpоцедуpа SetWindowPos

Описание:
procedure SetWindowPos(Wnd, WndInsertAfter: HWnd; X, Y, cx, cy: Integer; Flags: Word);

Изменяет pазмеp, положение и поpядок окна.

Паpаметpы:
Wnd: Идентификатоp окна.
WndInsertAfter: Пpедыдущее окно в списке администpатоpа окон.
X, Y: Веpхний левый угол.
cx: Новая шиpина окна.
cy: Новая высота окна.
Flags: Флаги установки положения окна.

HWND_BOTTOM Начало Z-последовательности
HWND_NOTOPMOST Первое окно которое располагается не "поверх все окон"
HWND_TOP Вершина Z-последовательности
HWND_TOPMOST Первое окно которое располагается "поверх все окон"

Флаги установки положения окна.

SWP_HIDEWINDOW - после проделаных действий над окном ( перемещением и изменением размера ) окно прячется
SWP_NOSIZE - если указан этот параметр, то 5й и 6й параметры учитываться не будут, т.е. окно менять размер не будет (этот параметр указан в нашем примере )
SWP_NOMOVE - если указан этот параметр, то 3й и 4й параметры учитываться не будут, т.е. окно не будет перемещаться.

SWP_SHOWWINDOW - после проделаных действий над окном ( перемещением и изменением размера ) окно будет показано ( работает только если окно было спрятано).
SWP_NOACTIVATE - после проделаных действий над окном ( перемещением и изменением размера ) окно не активируется.
Также доступны флаги: swp_DrawFrame, swp_NoRemove ,
swp_NoSize, swp_NoRedraw, swp_NoZOrder

Пример

with MyForm do
  SetWindowPos(Handle,
    HWND_TOPMOST,
    Left,
    Top,
    Width,
    Height,
    SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE);

 

[feministka]

Ответ: Помощь по Delphi

Говорю сразу я в делфи чуть больше чем ноль. Поэтому прозьба не издеватся, если я прогнала по полной программе.
Так вот.
У меня возникла такая проблемма: создала с помощю MainMenu меню(файл, справка ), все заполнила, как положено (тоесть, как в методичке за 1 курс, который я прохалявила...), все вроди как положено, но облом в том, что после компиляции то меню не видно... в чем может быть проблемма?
Скрины прилагаются.

 

[Merlіn]

Ответ: Помощь по Delphi

MainMenu свойство AutoMerge в False(Delphi 6)