Форум: "Начинающим";
Текущий архив: 2007.07.22;
Скачать: [xml.tar.bz2];
Вниз
юзернаме Найти похожие ветки
← →
юзар (2007-06-25 15:37) [0]как в лабел вывести имя пользователя?
← →
stone © (2007-06-25 15:40) [1]лабел.каптион := "имя пользователя";
← →
clickmaker © (2007-06-25 15:41) [2]Вин АПИ - ГетЮзерНаме()
← →
Сергей М. © (2007-06-25 15:42) [3]вар
стр: cтринг;
..
СетЛенгхт(стр, 255);
Иф GetUserName(ПыЧар(стр), Ленгхт(стр)) тхен
лабел.цаптион := стр;
← →
clickmaker © (2007-06-25 15:45) [4]
> [3] Сергей М. © (25.06.07 15:42)
неоптимально
вар
лен: стринг;
лен := 255;
СетЛенгхт(стр, лен);
иф ГетЮзерНаме(ПыЧар(стр), лен) тхен
лабел.цаптион := стр
елсе
РаисеЛастВин32Еггог();
:)
← →
Ega23 © (2007-06-25 15:46) [5]
> Сергей М. © (25.06.07 15:42) [3]
>
> вар
> стр: cтринг;
> ..
>
> СетЛенгхт(стр, 255);
> Иф GetUserName(ПыЧар(стр), Ленгхт(стр)) тхен
> лабел.цаптион := стр;
>
супер!
Напечатал, на стенку повесил!
← →
Сергей М. © (2007-06-25 15:48) [6]
> clickmaker © (25.06.07 15:45) [4]
Кто, сударь, вас учил говорить ГетЮзерНаме, в то время как это не иначе как ГэтьУсерНаме ?))
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2007.07.22;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.058 c
