Jetzt mitmachen!
Sie haben noch kein Benutzerkonto auf unserer Seite? Registrieren Sie sich kostenlos und nehmen Sie an unserer Community teil!
... und wenn man unterschiedliche IDs verteilt (in meinem nachfolgenden Beispiel 9001 bis 9004), dann klappt es auch perfekt mit Clicked():
cls
var hDlg& = create("Dialog", %hWnd, "Test", 10,10,300,200)
var x& = Control("SysLink","<a href=\qhttp://www.xprofan.com/\q>xprofan.com</a>",$50000000,10,10,80,25,hDlg&,9001,%hInstance,0)
var y& = Control("SysLink","<a>Hugo</a>",$50000000,10,50,80,25,hDlg&,9002,%hInstance,0)
var z& = Control("SysLink","<a>Toast</a>",$50000000,10,90,80,25,hDlg&,9003,%hInstance,0)
var ende& = Control("SysLink","<a>Ende</a>",$50000000,10,130,80,25,hDlg&,9004,%hInstance,0)
while 1
waitinput
if clicked(x&)
Messagebox("Weblink: XProfan","Test",0)
print gettext$(x&)
elseif clicked(y&)
Messagebox("Textlink: Hugo","Test",0)
elseif clicked(z&)
Messagebox("Textlink: Toast","Test",0)
elseif clicked(ende&)
break
endif
endwhile
end
Alles anzeigen
Gruß
Roland
Sie haben noch kein Benutzerkonto auf unserer Seite? Registrieren Sie sich kostenlos und nehmen Sie an unserer Community teil!