Delphi Forum

SimaWB yazdı:

Kod: Tümünü seç

while baslangic < son+1 do
  begin
    memo1.Lines.Add(IntToStr(bas));
    Inc(bas);
  end;

Ilginiz icin tesekkurler arkadaslar. Sorunum sayenizde cozuldu.

Cevabın için teşekkürler ama bu fonksiyondada yapmak isdedigim olmuyor. Yani for döngüsündeki i integerin herhangi bir seriden örneğin 2509001125063330 arttırmaya çalıştığım zaman - sonuçlu sayı alıyorum. Amacım 16 basamaklı seri başı ve seri sonunu sıralamak.
örnek;
edit1.text(seribaşı ...

Merhaba arkadaşlar. Delphide yapmaya çalıştığım programın içinde olması gereken seri lot kodunda sorun yaşıyorum. Aşağıdaki kodu denedim fakat seri 9-10 basamaktan fazla olunca "-572589576" gibi sonuç veriyor ama benim 18 basamak kullanmam gerekir. Bu konuda yardımcı olurmusunuz ? Şimdiden teşekkür ...

select * from [Sayfa1$] şeklinde kullanmalısın..