Изрових си едни стари сорсове още от времето на TurboPascal 6, когато съм бил млад и зелен и още ученик :)
Delphi-то ги отваря, но проблема е, че вътре съм коментирал на кирилица и сега излизат само маймуни. Какъв шрифт да си кача, че да мога да си видя писанията?

Съдържаниет е скрито
Влезте за да го видите

просто ги конвертирай от ДОС към ВИН кирлица :)))
малиии, колко назад във времето си се върнал.... на мен добре че ми гръмна хардиска с архивите... та не си ги спомням ;)

Съдържаниет е скрито
Влезте за да го видите

Тук изрових един стар код - дано да тръгне - добавка е към стандартния RichEdit

function ToASCII(S:String):String;
var i:byte;
begin
Result:='';
for i:=1 to Length(S) do
if Ord(S)>=$80 then //191
Result:=Result+Chr(Ord(S)+($C0-$80)) else //-64
Result:=Result+S;
end;


procedure TMainForm.ConvertDOScyrtoWincyr1Click(Sender: TObject);
var i:integer;
begin
if Editor.HandleAllocated then
for i:=0 to Editor.Lines.Count do
Editor.Lines:=ToASCII(Editor.Lines);
end;

---

Съдържаниет е скрито
Влезте за да го видите

Оправих се, мерси на всички.

Съдържаниет е скрито
Влезте за да го видите