Post Top Ad

Post Top Ad

Tehnik pengambilan kata dalam sebuah kalimat dalam delphi versi ngirit koding.

By Asrur Pascal Duniaku



Tehnik pengambilan kata dalam sebuah kalimat dalam delphi/lazarus yg menurut sy super super super ngirit koding.
kalimat 1 : pak joko transaksi berhasil dengan sn:1234 saldo: 1.500
kalimat 2 : pak ji transaksi berhasil dengan sn:123 saldo: 1.500
bagaimana cara ngambil sn yg berbeda tp dg koding yg sama?
tehnik boros koding:
var i:integer;
s:string;
begin
i:=ansipos('sn:',kalimat);
delete(kalimat,1,i+2);
i:=ansipos(' saldo',kalimat);
s:=copy(kalimat,1,i-1);
showmessage(s);
end;
----------------------------------------------------
tehnik super super super ngirit kodingnya:
uses
synautil;

var s:string;
begin
s:=synautil.SeparateRight(kalimat,'sn:');
s:=synautil.SeparateLeft(s,' saldo');
showmessage(s);

Anda membutuhkan komponen elektronik , Arduino, Sensor, Tutorial(paket belajar), jasa pembuatan alat berbasis mikrokontroler, kendali lampu via jaringan LAN, dan sebagainya ? anda dapat membelinya di  
 
 
https://www.tokopedia.com/mikroholik