Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2008.02.24;
Скачать: [xml.tar.bz2];

Вниз

Помогите считать текст из Static чужого окна   Найти похожие ветки 

 
Звоновский   (2008-01-29 14:06) [0]

Окно является сообщением. функция GetWindowText  ничего не возвращает, а
 SendMessage(h,WM_GETTEXTLENGTH,0,Len);
 SetLength(BuffStr,Len);
 SendMessage(h,WM_GETTEXT,Len+1,Integer(@BuffStr[1]));


Возвращает только имя класса контрола.
Может подскажете какие еще другие способы есть считать текст из Static?


 
Compiler ©   (2008-01-31 01:54) [1]

> GetWindowText  ничего не возвращает

У меня работает
function GetEditText(hwin:HWND):Pchar ;
var
 l:integer; p:pchar;
begin
L:=SendMessage(hwin,WM_GETTEXTLENGTH,0,0)+1;
GetMem( p, l );
GetWindowText(hwin, p, l );
result:=p;
FreeMem( p, l );
end;


 
ketmar ©   (2008-01-31 02:08) [2]

а с чего вообще автор решил, что у static есть hwnd?


 
Семеныч   (2008-01-31 03:16) [3]

Есть. Это окно.


 
ketmar ©   (2008-01-31 03:26) [4]

>[3] Семеныч (31.01.08 03:16)
я всегда считал, что TLabel — это окно. а TStaticText — нет.


 
ага   (2008-01-31 05:10) [5]

>>>я всегда считал, что TLabel — это окно. а TStaticText — нет.

Ага. Тока наоборот.


 
ketmar ©   (2008-01-31 05:51) [6]

>[5] ага (31.01.08 05:10)
точно уверен? я вот в обратном уверен. однако же доказать не могу в силу неналичия установленой Delphi. пусть утречком выскажется кто-то с исходниками генофонда под рукой.


 
Palladin ©   (2008-01-31 07:08) [7]


> [6] ketmar ©   (31.01.08 05:51)

Семеныч и ага правду говорят :)


 
ketmar ©   (2008-01-31 08:52) [8]

>[7] Palladin ©(31.01.08 07:08)
во блин. тогда каюсь, был неправ. йопт, щаз пойду в локалке Delphi искать. ну не мог же я так крупно лажануться? это что, товарищи, вот так начинается маразм?


 
Anatoly Podgoretsky ©   (2008-01-31 09:10) [9]

> ketmar  (31.01.2008 05:51:06)  [6]

Верить людям надо.


 
Anatoly Podgoretsky ©   (2008-01-31 09:10) [10]

> ketmar  (31.01.2008 08:52:08)  [8]

Надо поработать любимым инструментом и все пройдет.


 
ketmar ©   (2008-01-31 09:25) [11]

>[9] Anatoly Podgoretsky ©(31.01.08 09:10)
«доверяй, но проверяй!» (ц)

>[10] Anatoly Podgoretsky ©(31.01.08 09:10)
ну не пишу я на Delphi уж больше года, забыл… не знал, не знал, как оказывается, и опа! — забыл.


 
Anatoly Podgoretsky ©   (2008-01-31 09:47) [12]

> ketmar  (31.01.2008 09:25:11)  [11]

Ну тогда помогу.

TButton - окно
TSpeedButton - картинка
TStaticText - окно
TLabel - картинка


 
ketmar ©   (2008-01-31 09:52) [13]

>[12] Anatoly Podgoretsky ©(31.01.08 09:47)
блин, ну всегда был уверен, что TLabel — это окно с классом STATIC. потому у неё и бордюрчиков a-la TStaticText нет. а вот как раз TStaticText — это наследник графконтрола, и оно рисуется без окна, оттуда и красоты. «шьёрт побьери!» (ц)


 
ketmar ©   (2008-01-31 09:53) [14]

я понимаю, что наверняка народ уже в генофонде посмотрел, я просто удивляюсь сам себе…


 
Virgo_Style ©   (2008-01-31 10:30) [15]

imho название у StaticText сбивающее с толку. Раз Static, значит неизменный, раз неизменный - то подпись какая-нибудь типа "жать здесь", а если так, то пусть будет картинкой.
А в действительности наоборот...


 
Palladin ©   (2008-01-31 10:32) [16]


> [14] ketmar ©   (31.01.08 09:53)

каюсь, после [8] пошел уточнить... :) смутил ты меня...


 
ketmar ©   (2008-01-31 11:21) [17]

>смутил ты меня…
знал бы ты, как я сам смущён… просто до состояния офигения. позорная ошибка, учитывая стаж.


 
DrPass ©   (2008-01-31 11:27) [18]


> Anatoly Podgoretsky ©   (31.01.08 09:10) [10]

> Надо поработать любимым инструментом и все пройдет.

Стаканом, что ли?



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2008.02.24;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.48 MB
Время: 0.062 c
15-1200769199
wl
2008-01-19 21:59
2008.02.24
Bluetooth PAN + Internet Sharing


2-1201887045
NeiL
2008-02-01 20:30
2008.02.24
Alpha канал


15-1200988460
shlst
2008-01-22 10:54
2008.02.24
Потерянный доступ!


2-1201538438
ComboBox
2008-01-28 19:40
2008.02.24
Шрифт в ComboBox


15-1201277000
Petr V. Abramov
2008-01-25 19:03
2008.02.24
TWO_PHASE_COMMIT в шлюзе Oracle -> MSSQL





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский