English 中文(简体)
象TPanel一样,高层的控制能够做到?
原标题:Controls on top, like TPanel can do?

我的方案正在进行耗时的任务,我希望在申请窗口的中间展示通航道,但不会停留在顶头上——我的《世界统计》总是站在上。 然而,当我使用“TPanel”时,它就站在前线? 我怎么能让我的快乐这样做?

事实上,适用于所有控制的解决办法是:

感谢!

最佳回答

页: 1 (即控制窗户,或“适当”控制),以显示你的讯息,因为非窗口控制不能出现在窗户控制之上。 最容易的解决办法是将<代码>TImage列入TPanelImage1.Align :=alClient Panel1.BorderStyle := bsNone

如果你想在你的普通控制之上提取一个半透明的轨道图,那么你可以一如既往地这样做:

procedure TForm1.Button1Click(Sender: TObject);
var
  bm: TBitmap;
  png: TPngImage;
begin
  // The form contains a hidden TPanel (somewhere on the form)
  // with a TImage (alClient).

  // png is a PNG image with an alpha channel
  png := TPngImage.Create;
  try
    png.LoadFromFile( C:UsersAndreas RejbrandPicturesalpha.png );
    // Create bitmap of form and blend PNG on it
    bm := GetFormImage;
    try
      bm.Canvas.Draw(0, 0, png);
      Image1.Picture.Bitmap := bm;
    finally
      bm.Free;
    end;
    Panel1.Align := alClient;
    Panel1.BringToFront;
    Panel1.Show;
  finally
    png.Free;
  end;
end;

Sample result

问题回答

A. 导 言 TImage没有与之相关的窗口,而且它和小组之间也存在差别。

添加一个小组,并将图像放在小组内,即图像母是小组。 然后,你可以把小组带到前线,把形象带给前面。

你们是否想躲藏你们的《职业道德标准》?





相关问题
determining the character set to use

my delphi 2009 app has a basic translation system that uses GNUGetText. i had used some win API calls to prepare the fonts. i thought it was working correctly until recently when someone from Malta ...

Help with strange Delphi 5 IDE problems

Ok, I m going nuts here. For the last (almost) four years, I ve been putting up with some extremely bad behavior from my Delphi 5 IDE. Problems include: Seemingly random errors in coride50.bpl ...

How to write a Remote DataModule to run on a linux server?

i would like to know if there are any solution to do this. Does anyone? The big picture: I want to access data over the web, using my delphi thin clients. But i´would like to keep my server/service ...

How convert string to integer in Oxygene

In Delphi, there is a function StrToInt() that converts a string to an integer value; there is also IntToStr(), which does the reverse. These functions doesn t appear to be part of Oxygene, and I can ...

Quick padding of a string in Delphi

I was trying to speed up a certain routine in an application, and my profiler, AQTime, identified one method in particular as a bottleneck. The method has been with us for years, and is part of a "...