Моя программа выполняет трудоемкую задачу, и я хотел бы отобразить TImage в середине окна приложения, но он не останется сверху — мой VST всегда сверху. Однако, когда я использую TPanel, он остается сверху? Как я могу заставить свой TImage сделать это?
На самом деле, решение, применимое ко всем элементам управления, было бы великолепным :)
Спасибо!
Вам нужен оконный элемент управления (то есть элемент управления с дескриптором окна или "правильный" элемент управления) для отображения сообщения, поскольку неоконный элемент управления не может быть виден над оконным элементом управления. Самое простое решение — поместить TImage в TPanel и установить Image1.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:\Users\Andreas Rejbrand\Pictures\alpha.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;
WS_EX_TRANSPARENT и ответили на некоторые сообщения.) Пожалуйста, просветите нас, если да.
- person Andreas Rejbrand; 20.03.2011
TEdit. Теперь поместите TPanel в форму и позвольте ей покрыть большую часть правок. Запустите проект. Теперь вы не видите правок за панелью. Таким образом, в в этом смысле он не прозрачен.
- person Andreas Rejbrand; 20.03.2011
TImage не имеет связанного с ним окна, и в этом разница между ним и панелью.
Добавьте панель и поместите изображение внутрь панели, т.е. родителем изображения является панель. Затем вы можете вывести изображение на передний план, переместив панель на передний план.
Вы думали о том, чтобы скрыть свой VST?
