Скачать: CL | DM;

юзернаме   Найти похожие ветки 

← →
юзар   (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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.015 c