Aleksej » 28.11.2003 (Пт) 16:46
1. Получи количество строк в TextBox'e:
Count =SendMessage(Text.hwnd, EM_GETLINECOUNT, 0, 0)
2. Получи длину строки:
LineLength = SendMessage(Text.hwnd, EM_LINELENGTH, i, 0) + 1
3. Добавить в массив:
result = SendMessage(Text.hwnd, EM_GETLINE, i, ByVal strBuffer)
И с каждой отдельной строкой в массиве, делай что хочешь.