TLabel'i Delphi'de nasıl bir köprü gibi davranabilirim?TLabel'i Delphi'de nasıl bir köprü gibi davranabilirim?
Not: Geriye dönük uyumluluk sorunları nedeniyle TLinkLabel kullanmayla ilgilenmiyorum.
TLabel'i Delphi'de nasıl bir köprü gibi davranabilirim?TLabel'i Delphi'de nasıl bir köprü gibi davranabilirim?
Not: Geriye dönük uyumluluk sorunları nedeniyle TLinkLabel kullanmayla ilgilenmiyorum.
Mavi renkle vurgulayın, stilin altını çizin ve bir OnClick olayı ekleyin!
procedure TForm1.Label1Click(Sender: TObject);
var
MyLink: string;
begin
MyLink := 'http://www.mysite.com/';
ShellExecute(Application.Handle, PChar('open'), PChar(MyLink),
nil, nil, SW_SHOW);
end;
Köprüleriniz için gereksinim duyduğunuz şeye bağlıdır. uygun
OnMouseEnter ve OnMouseLeave, D7 ve daha eski sürümlerde (D2005 hakkında emin değilseniz) eklenmez. Bu nedenle, TLinkLabel hakkındaki yorum da bunu engeller. OnMouseMove –
kullanmanız gerekecek. Ben sadece kontrol ettim - Delphi 7, kesinlikle OnMouseEnter ve OnMouseLeave'a sahiptir:} – moobaa
@Gerry: Evet; Sadece biraz daha sıkı çalışmalısın.
kullandığınız Delphi sürümü nedir? Delphi 4 IDE'ye baktığımda, TLabel'in, kullanıcı "bağlantı" üzerinden geçtiğinde imleci "El" e çevirmek için gerekli olan bir OnMouseEnter/OnMouseLeave olayı yoktur.
Bu kullanıcının web tarayıcısını başlatmak kadar bağlayabilirsiniz OnClick olay, var: için
Delphi 2009. Belki de fare üzerinde yanlış bir terim oldu. TLabel için, D2009'da, bu etiket için hangi imlecin kullanılması gerektiğini belirtebilirsiniz. – Rowan
Bir kutu sekmesini ve bir tarayıcıda bağlantıları odağı verir. Bu nedenle, bu görev için pencereli bir denetim kullanmayı (sahibi tarafından çizilmiş TButton gibi) düşünürdüm.
Evet, aradığım şey buydu. Başka hiçbir fikrin bulunmadığından emin olmak için bir iki gün içinde kabul edeceğim. Şerefe. – Rowan
"SW_SHOWNORMAL" olmalıdır. –
"ShellApi kullanır;" –